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Vorwort 


Dies ist die erste deutschsprachige Darstellung des Diskettenbetriebssystems DOS 3.3 
für den Apple IV/II Plus/IIe. Im Gegensatz zu dem bislang nur in Englisch erschienen, 
ausschließlich für Assembler-Programmierer gedachten Buch ‚‚Bencath Apple DOS“ 
von D. Worth und P. Lechner, das das 48K DOS sozusagen bis zum letzten Byte seziert, 
aber infolge fehlender praktischer Beispiele im großen und ganzen nur für Systempro- 
grammierer von Nutzen ist, liegt das Schwergewicht des vorliegenden Buches auf der 
ANWENDUNG von DOS 3.3 sowohl für Applesoft- als auch Assembler-Program- 
mierer. 


Der erste Teil behandelt ausführlich die dem Applesoft-Programmierer zur Verfügung 
stehenden DOS-Befehle, wobei die Textfiles wegen ihrer großen Bedeutung und der ver- 
gleichsweise komplizierten Handhabung besonders eingehend dargestellt werden. Viele 
Tricks aus meiner langjährigen Programmiererfahrung werden hier zum erstenmal ge- 
schildert. Aber auch im zweiten Teil findet der reine Applesoft-Programmierer insbe- 
sondere in dem Kapitel ‚‚Vermischte Tips, Tricks und Patches“ zahlreiche verwertbare 
Anregungen. Im übrigen ist der zweite Teil für reine Assembler-Programmierer ge- 
dacht. Neben einer detaillierten Beschreibung der RWTS enthält dieser Teil elf vollstän- 
dige RWTS-Anwendungsprogramme, die wie beispielsweise der TSL-Maker, der File- 
Reader, der RAM-Disk-Driver und die Fastbrun-Routine Techniken enthüllen, die bis- 
lang noch niemals publiziert (und wahrscheinlich auch noch nichtentdeckt) wurden. An- 
derenfalls wäre es unverständlich, weshalb solche ansonsten professionellen Anwender- 
programme wie zum Beispiel Visicale 3.3 oder Applewriter Ile 3.3 eine „‚schiere Ewig- 
keit‘ für das Einlesen von Textfiles benötigen. Unter Anwendung der hier erstmals be- 
schriebenen Techniken würde sich die Einlesedauer auf einen Bruchteil der sonst benö- 
tigten Zeit reduzieren. Bei allen geschilderten Verfahren und Methoden wurde auf DOS- 
Kompatibilität Wert gelegt, d.h. es werden gewissermaßen nur ‚‚Tricks ohne Finten“ 
dargestellt. 


Bei den Anwendungsbeispielen wurde darauf geachtet, daß sie gleichzeitig einen sinn- 
vollen Zweck erfüllen. So wird z.B. die Fastbrun-Routine anhand eines Apple Il Plus 
Emulators für den Apple Ile erklärt, so daß man mit Hilfe dieser Routine nunmehr auf 
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dem Apple IIe Programme laufen lassen kann, die aus verschiedenen Gründen aus- 
schließlich auf dem Apple II Plus liefen. 


In der vorliegenden zweiten Auflage, die bereits drei Monate nach der Erstauflage erfor- 
derlich war, sind an einigen Stellen Setzfehler ausgemerzt sowie bei einem Programm 
(RWTS-Muster, Seite 113 - 115) vier fehlende Programmzeilen ergänzt worden. 


An dieser Stelle möchte ich den zahlreichen Lesern danken, die mich spontan — meist 
auf dem Umweg über die Auskunft — angerufen haben. Deshalb, wenn Sie Fragen zu 
dem DOS-Buch haben, hier meine Telefon-Nummern und Anschriften: tagsüber 
06221/489-1 (Dr. Alfred Hüthig Verlag, 6900 Heidelberg, Im Weiher 10) und abends 
06221/800154 (6900 Heidelberg-Ziegelhausen, Rainweg 78). 

Eingedenk der Tatsache, daß sich ein Leser 48 Stunden lang vergeblich bemüht hatte, 
den RAMDISK-Driver (Seite 170ff.) zum Laufen zu bringen, sei darauf hingewiesen, 
daß alle Programme exakt wie beschrieben laufen, wenn entweder das unveränderte 
DOS 3.3 von der System-Master-Diskette oder im Falle von Diversi-DOÖS die Version 
2-C verwendet wird. Vonden neueren Versionen, insbesondere 4-C, muß abgeraten wer- 
den, da hier viele Systemadressen nicht mehr stimmen. 


Übrigens liegt inzwischen die Begleitdiskette zum DOS-Buch vor. Ferner erschien in 
diesem Monat der erste Band von ‚,Apple ProDOS für Aufsteiger“ einschließlich geson- 
dert erhältlicher Begleitdiskette. Da ich zur Zeit noch an dem Buch ‚‚Apple Assembler 
— Vom Anfänger zum Profi“ arbeite, das für August/September geplant ist, wird der 
zweite Band des ProDOS-Buches nicht vor September/Oktober herauskommen. 


Ulrich Stiehl 


Heidelberg, im Juni 1984 
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Teil I: DOS für Anwender und 
Applesoft-Programmierer 


In diesem Teil I werden die Grundlagen des DOS 3.3-Betriebssystems in leichtver- 
ständlicher Form für Benutzer von Anwenderprogrammen sowie Applesoft- 
Programmierer behandelt. Einige Fakten sind bewußt vereinfacht dargestellt, damit 
der Neuling nicht durch zu viele technische Details abgeschreckt wird. Allerdings 
setzt dieser Teil ab Kapitel 2 Grundkenntnisse von Applesoft voraus, da dieses Buch 
kein Applesoft-Lehrbuch darstellen kann. 





1. DOS für Benutzer von Anwender- 
programmen 


1.1. Betriebssystem 


DOS ist die Abkürzung für Disk Operating System (= Diskettenbetriebssystem). Ein 
Diskettenbetriebssystem ist ein in der Regel in Maschinensprache geschriebenes Sy- 
stemprogramm, das der Verwaltung von Files (= Dateien) auf der Diskette dient. 
Files können Programme, z.B. Basic- oder Maschinenprogramme, Speicherauszüge, 
z.B. Grafikbilder, sowie Dateien im engeren Sinne sein, z.B. Brieftexte, Adressen, 
Telefonverzeichnisse usw, 

Für den Apple II Plus und den neueren Apple Ile gibt es verschiedene Diskettenbe- 
triebssysteme, nämlich 


a) das Pascal-Betriebssystem 
b) das ProDOS-Betriebssystem 
c) das DOS 3.3-Betriebssystem 


Betriebssysteme sind zumeist mehr oder weniger eng mit Programmiersprachen ver- 
quickt. So eignet sich z.B. das Pascal-Betriebssystem grundsätzlich nur zur Anwen- 
dung in Verbindung mit der Programmiersprache Pascal. ProDOS und DOS 3.3 
sind für die Programmiersprachen Basic und Assembler (6502 Maschinensprache) 
gedacht. DOS 3.3 kann sowohl unter Applesoft Basic als auch unter Integer Basic 
eingesetzt werden, während ProDOS auf Applesoft Basic beschränkt ist. 


1.1.1. Wann soll ich ProDOS und wann DOS 3.3 einsetzen? 


ProDOS ist für externe Massenspeicher, d.h. Diskettenlaufwerke mit großer Kapazi- 
tät sowie für Fest- und Wechselplattenlaufwerke ausgelegt. Damit eignet sich Pro- 
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DOS besonders gut für die Verwaltung von großen Datenmassen, z.B. Adreßdateien 
mit 10.000 Adressen usw. Der Preis für diese größere, externe Speicherkapazität ist 
ein um ca. 12.000 Speicherstellen geringerer interner Speicherraum, weil ProDOS als 
umfangreicheres Betriebssystem entsprechend mehr Platz beansprucht. 

DOS 3.3 eignet sich mehr für kleinere externe Datenspeicher, z.B. die klassischen 
Apple-Diskettenlaufwerke mit ca. 143.000 Zeichen externer Speicherkapazität sowie 
die neueren von Fremdfirmen angebotenen Laufwerke (z.B. Cumara), die eine Spei- 
cherkapazität von mehr als 300.000 Zeichen haben. 


1.1.2. Ist DOS gleich DOS? 


Im Laufe der Zeit sind von Apple mehrere DOS-Verbesserungen erschienen, näm- 
lich DOS 3, DOS 3.1, DOS 3.2, DOS 3.2.1 und schließlich DOS 3.3. In diesem Buch 
befassen wir uns ausschließlich mit DOS 3.3, da die vorangehenden Versionen, z.B. 
DOS 3.2 vom 16.2.1979, heute praktisch nicht mehr benutzt werden. 


Aber auch DOS 3.3 ist nicht gleich DOS 3.3, denn im Laufe der Zeit sind von Apple- 
unabhängigen Firmen verschiedene DOS 3.3-Varianten veröffentlicht worden, z.B. 











PRONTO-DOS Ne 
DAVID-DOS Ko ENWER.. a . 
HYPER-DOS Wenn ın diesem Buch von Diversi-DOS die Rede ist, | 
ı dann ist stets Version 2-C gemeint. Die neueren Versio- 

SUPER-DOS 
DIVERSI-DOS nen, insbesondere 4-C, sind nicht zuempfehlen, da bei 

ü diesen die Systemadressen nicht mehr stimmen. | 
USW, je i 3 5 





Die beste DOS 3.3-Variante ist zweifellos Diversi-DOS, da dieses Betriebssystem bei 
einer Verbesserung der Zugriffsgeschwindigkeit um den Faktor 3-5 bei allen Datei- 
Arten einschließlich der sog. Textfiles keine Systemadreßänderungen vornimmt, so 
daß es mit DOS 3.3 völlig kompatibel ist, sofern der Programmierer im Falle eines 
Maschinenprogramms die Standard-Systemadressen benutzt und nicht wahllos im 
DOS ,‚‚herumpokt‘‘. Diversi-DOS ist etwa so schnell wie ProDOS. Die anderen DOS 
3.3-Varianten stellen in der Regel nur mäßige Verbesserungen dar, z.B. zumeist aus- 
schließlich im Hinblick auf die Geschwindigkeit des Einladens von sog. Binärfiles 
(Basic-Programme, Maschinenprogramme, Grafik-Bilder). 


Nachfolgend werden wir DOS 3.3 kurz als DOS bezeichnen. Alle Beschreibungen 
der Befehle und technischen Einzelheiten von DOS gelten auch für Diversi-DOS. 
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1.2. Laufwerk und Controller 


Die klassischen Apple-Laufwerke sind Disk-Drives der Firma Shugart, die als weitge- 
hend wartungsfrei und sehr zuverlässig bezeichnet werden können. Die Laufwerke 
sind durch ein Flachbandkabel mit einer sog. Controller-Karte verbunden, die in eine 
der sog. Slots (‚‚Schlitze‘‘) oder Steckplätze der Apple-Platine gesteckt werden kön- 
nen. Bei Apple II Plus können die Steckplätze 1-6 benutzt werden, während beim 
Apple Ile zusätzlich Slot 7 als möglicher Steckplatz in Frage kommt. Normalerweise 
sollte man die Controller-Karte in Slot 6 stecken, da zahlreiche Programme den Con- 
troller in Slot 6 erwarten. Ein einziger Controller kann mit zwei Laufwerken gleich- 
zeitig verbunden werden, die dann entsprechend als Slot 6, Drive 1 bzw. Slot 6, Drive 
2 angesprochen werden. Insgesamt können soviele Doppellaufwerke an den Apple 
angeschlossen werden, wie freie Steckplätze zur Verfügung stehen. 


Die Apple-Laufwerke lesen eine Diskette stets von unten, d.h. der Lesekopf befindet 
sich sozusagen unterhalb der in das Laufwerk eingeschobenen Diskette. Man beach- 
te, daß aus Gründen der Netzteilüberlastung zu einem bestimmten Zeitpunkt immer 
nur ein einziges Laufwerk eingeschaltet sein kann (erkenntlich an der rot aufleuch- 
tenden ‚‚in use‘‘-Lampe). 


Die Pflege der Laufwerke beschränkt sich auf zweierlei: 


1. kann man von Zeit zu Zeit— etwa zweimal pro Jahr— die Leseköpfe mit einer 
sog. Reinigungsdiskette reinigen. Hersteller von Reinigungsdisketten empfehlen eine 
häufigere, teilweise sogar wöchentliche Reinigung, doch scheint dies nach meinen 
Erfahrungen bei den Apple-Laufwerken nicht erforderlich zu sein. 


2. kann man von Zeit zu Zeit die Laufwerksgeschwindigkeit neu justieren. Hierzu ist 
erforderlich, daß man das Gehäuse durch Entfernen der 4 Bodenschrauben abzieht 
und die hinten, unten rechts befindliche kleine Schraube (,,Potentiometer‘‘) nach 
rechts oder nach links dreht, je nachdem, ob die Rotationsgeschwindigkeit zu hoch 
oder zu niedrig ist. Die im Handel käuflichen Kopierprogramme enthalten meist eine 
entsprechende „Speed Adjustment‘‘-Routine, die man zur Geschwindigkeitsregulie- 
rung laufen lassen muß. 


1.3. Diskette 


Disketten sind Datenträger mit direktem Zugriff, d.h. der Lesekopf kann per Pro- 
gramm jeden beliebigen Sektor der Diskette direkt lesen oder beschreiben. Demge- 
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genüber muß z.B. eine Datenkassette als Datenträger mit indirektem Zugriff solange 
vorwärts (oder sinngemäß rückwärts) gespult werden, bis der Lesekopf an der ge- 
wünschten Stelle angelangt ist. 

Disketten können einseitig oder beidseitig mit einfacher oder doppelter Schreibdichte 
beschrieben werden. Für Apple-Laufwerke genügen einseitige Disketten mit einfa- 
cher Schreibdichte. 

Ringverstärkte Disketten sind von Vorteil, doch darf der Ring bei Apple- 
Laufwerken nur ganz flach, d.h. wenig auftragend, sein. Eine optimale Zentrierung 
der Diskette erreicht man dadurch, daß man die Laufwerkklappe exakt in dem Mo- 
ment behutsam schließt, in dem das rote „in use‘‘-Lämpchen aufleuchtet. 

Der Leseschlitz der Diskette, der sich — wie bereits erwähnt — unten befindet, sollte 
niemals mit (fettigen) Fingern in Berührung kommen. Ferner sollte man Disketten 
nicht biegen (und erst recht nicht knicken) und nicht auf den Monitor legen (wegen 
der Gefahr des Magnetfeldes). Schließlich sollte man Disketten keinen Temperatur- 
schwankungen aussetzen. So kann z.B. das Verschicken von Disketten im Winter die 
Folge haben, daß der sich im Innern der Diskette befindliche Filz klamm wird und 
deshalb die magnetische Kunststoffscheibe (= die eigentliche Diskette) nicht mehr 
richtig rotiert. 


1.3.1. Reset 


Drücken Sie niemals die Reset-Taste, während ein Laufwerk eingeschaltet ist, denn 
wegen der damit verbundenen Stromzufuhr-Unterbrechnung wird in der Regel der- 
jenige Sektor zerstört, auf dem der Lesekopf gerade ruhte, und zwar stets dann, 
wenn eine Schreiboperation stattfand. Bei Leseoperationen geschieht meistens 
nichts, doch wer weiß schon genau, ob gerade gelesen oder geschrieben wird? Des- 
halb Finger weg von der Reset-Taste, solange das „In-use‘‘-Lämpchen an ist! Im äu- 
Bersten Notfall Laufwerkklappe öffnen, Diskette halb oder ganz herausziehen und 
erst dann Reset drücken! 


1.4. Speicherkapazität 


Eine Diskette ist in Tracks (= konzentrische Spuren) und jede Spur ihrerseits in Sek- 
toren eingeteilt. Die DOS-Diskette enthält 35 Spuren mit je 16 Sektoren. In einem 
einzelnen Sektor kann man 256 Zeichen (oder Bytes) speichern. Auf eine DOS- 
Diskette passen damit 35 mal 16 mal 256 = 143.360 Bytes (oder Zeichen). Eine Dis- 
kette umfaßt insgesamt 35 mal 16 = 560 Sektoren. Ein einzelne Spur enthält 16 mal 
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256 = 4096 Bytes oder 4 Kilobytes (1 Kilobyte = 1024 Zeichen), womit eine Diskette 
35 mal 4 = 140 Kilobytes beinhaltet. 


Die 35 Spuren sind von O bis 34 (oder hexadezimal von $00-$22) numeriert. Die Sek- 
toren sind von 0-15 (oder hexadezimal von $00-$0F) numeriert, Die Spur 0 ist die äu- 
Berste und die Spur 34 die innerste Spur. Zwischen äußerster und innerster Spur be- 
trägt der Abstand nicht einmal I cm, so daß die auf der Diskette genutzte Lesezone 
sehr schmal ist. 


Auf den Spuren 0-2 befindet sich normalerweise das Betriebssystem, und auf der 
Spur 17 (hexadezimal $11) befindet sich der sog. Catalog, d.h. das Disketteninhalts- 
verzeichnis. Damit stehen auf einer normalen Diskette nur 35 minus 4 = 31 Spuren 
für reine Datenspeicherung zur Verfügung. Die Nettokapazität beträgt damit 31 mal 
4096 = 126.976 Zeichen oder 31 mal4 = 124 Kilobytes. Es besteht die Möglichkeit, 
DOS-lose Datendisketten zu erstellen, bei denen die Spuren 1 und 2 für Daten ge- 
nutzt werden können, so daß dann die Nettokapazität 33 mal 4096 = 135.168 Zei- 
chen beträgt. 


1.5. Booten 


„Bootstrap‘“ bedeutet auf englisch eigentlich Stiefelschlaufe und ‚by one’s own 
bootstrap‘‘ besagt soviel wie, daß man sich wie Münchhausen am eigenen Schopfe 
herauszieht. Ein Bootstrap-Programm oder kurz Boot-Programm ist ein sog. Urla- 
der, der in aufeinanderfolgenden Stufen (ähnlich wie beim Raketenstart) das Be- 
triebssystern einlädt. Das Boot-Programm befindet sich als nur 256 Bytes langes Pro- 
gramm in der Controller-Karte und wird im Falle von Slot 6 durch folgende Befehle 
aktiviert: 


a) von Applesoft (Cursor U} aus durch PR #6 (bei Slot 5 PR#5 usw.) 
b) vom Monitor (Cursor *) aus durch 6 Ctrl-P (bei Slot 5 5 Ctrl-P usw.) 


Dies gilt für den Fall, daß der Apple bereits eingeschaltet war. Das reine Einschalten 
des Apple bewirkt automatisch den Boot-Vorgang (durch ein entsprechendes Moni- 
torprogramm, das bei $FAA6 beginnt und dann nach $C600 im Falle von Slot 6 
springt). Ferner bewirkt beim eingeschalteten Apple IIe die Tastenkombination Ctrl- 
Offener Apfel-Reset den Start des Boot-Programms. 


Heutzutage gibt es kaum noch Apple II Plus Geräte mit weniger als 48K Speicherka- 
pazität, und Apple Ile Geräte haben ohnehin stets 64K Speicherkapazität, so daß so- 
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genannte Master-Disketten, die das DOS ın den jeweils höchstmöglichen Speicherbe- 
reich verschoben hatten, keine Bedeutung mehr haben. 

Nach Beendigung des Boot-Vorgangs befindet sich das DOS in dem Bereich $9600- 
$BFFF (oder dezimal 38400-49151). Der für Programm und Daten freie Arbeitsspei- 
cher beträgt damit ca. 36.000 Zeichen. Die Speicherverteilung sieht genauer gesagt 
folgendermaßen aus (technische Details siehe Teil II dieses Buches): 


1. $0000-$00FF:  Zero-Page oder Nullseite 
2. $0100-$01FF: Stack oder Prozessor-Stapel 
3. $0200-$02FF: Tastatureingabe-Puffer 
4. $0300-$03CF: frei für kurze Maschinenprogramme 
5. $03D0-$03FF: DOS-Vektoren 
6. $0400-$07FF:  Bildschirmspeicher 
7. $0800-$95FF: frei für Programm und Daten 
8. $9600-$9CFF: 3 DOS-Datenpuffer 
9. $9D00-$SAACB: DOS-Befehlsinterpreter 
10. $AAC9Y-$BSFF: DOS File Manager (Entry bei $AAFD) 


ll. $B600-$BFFF: DOS RWTS (Entry bei $ BD00) 


Wenn das DOS in die Language Card (= die oberen 16K RAM) des Apple Ile oder 
Apple II Plus durch einen sog. DOS-Mover geschoben wird, sieht die Speichervertei- 
lung in der Regel so aus: 


$0800-SBEFF: frei für Programm und Daten 
$BF00-$BFFF: DOS-Driver für Bank-Selecting 
$D000-$DFFF: Bank I der Language Card frei 
$D000-$FFFF: Bank 2 der Language Card DOS 


ae 


Die DOS RWTS würde dann z.B. bei $F600 beginnen. Der für Programm und Da- 
ten freie Speicherraum beträgt dann ca. 47.000 Zeichen. 


1.6. Initialisierung (INIT) 


Die Initialisierung— auch Formatierung genannt— bereitet die fabrikneue Leerdis- 
kette zur Datenaufnahme vor, indem softwaremäßig ein bestimmtes Bit-Muster auf 
die Diskette geschrieben wird, damit der Lesekopf später die einzelnen Spuren und 
Sektoren finden kann (Apple-Disketten sind soft-sektoriert, d.h. softwaremäßig in 
Sektoren eingeteilt. Gegensatz: hard-sektoriert mit z.B. 16 Sektoren-Löchern). 
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Nach dem Booten einer bereits vorliegenden Programmadiskette, z.B. der ‚System 
Master‘‘-Diskette, wird das sog. Hello-Programm geladen. Dies ist dasjenige 
(Applesoft-)Programm, unter dessen Name die Programmdiskette zuvor initialisiert 
wurde. Ein solches Hello-Programm kann z.B. so aussehen: 


10 HOME : PRINT ‚„DISKETTE ANGELEGT AM 1.3.84“ 
Anwender, die keinerlei Programmiererfahrung haben, verfahren bitte wie folgt: 


. „System Master‘‘-Diskette in Laufwerk 1 einlegen 

. PR #6— gefolgt von der Return-Taste— eingeben 

. Leerdiskette in Laufwerk 1 einlegen 

NEW-—- ın Großbuchstaben, gefolgt von der Return-Taste— eingeben 
, 10 HOME : PRINT ‚„DISKETTE ANGELEGT AM ...“ 

— gefolgt von der Return-Taste— eingeben 

6. INIT ZUNAME-- gefolgt von der Return-Taste— eingeben 


Damit wird die Leerdiskette unter Ihrem Narnen initialisiert und zur Datenaufnahme 
vorbereitet. 


1.7. CATALOG, LOCK, UNLOCK, VERIFY 


Geben Sie jetzt den Befehl CATALOG-- gefolgt von Return— ein. Sie sehen dann 
den Catalog oder das Disketteninhaltsverzeichnis (auch Directory genannt), das etwa 
im Falle des Namens Meier folgendermaßen aussieht: 


DISK VOLUME 254 

A 002 MEIER 

„A°‘ steht für Applesoft. ‚002° steht für die Anzahl der Sektoren (2), die das 
Applesoft-Programm namens ‚„MEIER‘ einnimmt. Um die Länge einer Datei über- 
schlägig zu berechnen, multiplizieren Sie die Anzahl der Sektoren minus 1 mit 256. 
Hier gilt: (2 minus 1) mal 256 = 256, d.h. die Datei MEIER ist bis zu 256 Zeichen 
lang. 


Tippen Sie nun stets gefolgt von der Return-Taste— 


LOCK MEIER 
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und dann 

CATALOG 

Sie sehen jetzt 

DISK VOLUME 254 

*A 002 MEIER 

Vor dem „A“ steht also jetzt ein Sternchen, was besagt, daß die Datei ‚„‚ge-LOCKt‘“ 


oder schreibgeschützt wurde (to lock = zuschließen). Mit dem LOCK-Befehl kann 
man also eine Datei vor dem Überschreiben schützen. 


Tippen Sie nun 
UNLOCK MEIER 
und dann 
CATALOG 


Sie sehen dann wieder den ursprünglichen Catalog, d.h. das Sternchen wurde wieder 
entfernt. Mit dem UNLOCK-Befehl (to unlock = aufschließen) läßt sich also der 
Schreibschutz wieder aufheben. 


Der LOCK-Befehl ist nur ein relativer Schutz vor dem Überschreiben einer Datei, 
denn wenn Sie z.B. jetzt INIT MEIER erneut eingeben würden, so würde die Disket- 
te durch den Formatierungsvorgang völlig überschrieben, d.h. man kann auch be- 
reits initialisierte Disketten erneut initialisieren. Wenn sie ganz sicher gehen wollen, 
daß die Daten auf der Diskette nicht mehr verändert werden, dann überkleben Sie 
die seitliche Schreibschutzeinkerbung auf der Diskette mit dem in der Disketten-Box 
befindlichen Klebestreifen. Dann kann die Diskette weder überschrieben noch durch 
Unachtsamkeit aus Versehen neu initialisiert werden, 


Tippen Sie nun 
VERIFY MEIER 


und danach 
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VERIFY MUELLER 


Im ersteren Fall passiert gar nichts, während Sie im letzteren Fall die Fehlermeldung 
FILE NOT FOUND (= Datei nicht gefunden) erhalten. Der VERIFY-Befehl (to 
verify = überprüfen) überprüft erstens die Existens einer Datei und zweitens wird 
die Intaktheit der Datei durch vollständiges Einlesen derselben ermittelt. Es gibt also 
die Möglichkeit, daß zwar der Dateiname aus dem Catalog ersichtlich ist, aber der 
VERIFY-Befehl trotzdem zu einer Fehlermeldung führt (dann meist /O ERROR), 
was besagt, daß die Datei physisch defekt ist, z.B. wenn Zigarettenasche auf die Dis- 
kette gefallen ist. 


1.8 Kopieren von Disketten und Dateien 


Die ‚‚System Master‘‘-Diskette enthält zwei wichtige Kopierprogramme, nämlich 


1. COPYA zum Duplizieren kompletter Disketten, und 
2.  FID zum Kopieren einzelner Dateien. 


Beide Programme sind in dem ‚„„DOS Handbuch‘ von Apple ausführlich beschrie- 
ben, so daß hierauf nicht näher eingegangen zu werden braucht. COPYA wird mit 
RUN COPYA 

gestartet, während FID mit 

BRUN FID 

gestartet wird. 


Anstelle von COPYA kann man auch das erheblich schnellere Programm 
COPY.IHE verwenden, dessen Listing im Teil II dieses Buches abgedruckt ist. 








2. DOS für Applesoft-Programmiierer 
2.1. Dateinamen 


Während maschinensprachlich die meisten ASCI-Zeichen als Dateinamen möglich 
wären, sollte man normalerweise bei der Wahl der Dateinamen folgende Regeln be- 
achten: 


1. Ein Dateiname sollte nur aus Großbuchstaben, Ziffern, Leertaste und Punkt 
bestehen. 

2. Ein Dateiname sollte stets mit einem Großbuchstaben beginnen. 

3. Ein Dateiname darf höchstens 30 Zeichen lang sein 


Danach wäre z.B. ‚+1 Datei‘‘ ein illegaler Dateiname, weil er mit keinem Groß- 
buchstaben beginnt und außerdem noch Kleinbuchstaben enthält. Beispielsweise 
könnte der Applewriter Ile infolge eines Programmierfehlers keine Dateinamen ein- 
lesen, die den Bindestrich enthalten, z.B. „DATEI-1‘ (Grund: Der Applewriter ver- 
sucht, den ‚,-“ in einen Großbuchstaben umzuwandeln, was natürlich nicht geht). 
Wenn man die obigen Regeln beachtet, entstehen niemals Konflikte bei Anwender- 
programmen. 

Auf eine Diskette passen insgesamt 105 Dateinamen und damit theoretisch insgesamt 
105 Dateien. Soviele Dateien können jedoch normalerweise niemals auf einer Disket- 
te untergebracht werden, weil sonst jede Datei im Durchscnitt weniger als 5 Sektoren 
einnehmen müßte, denn eine Diskette enthält normalerweise nur 496 Daten-Sektoren 
(31 Spuren mal 16 Sektoren). 


2.2. Befehlsnamen 


Ähnlich wie bei Applesoft (z.B. HOME, NEW, PRINT usw.) gibt es bei DOS zahl- 
reiche Befehlsnamen (z.B. CATALOG, LOCK, UNLOCK, VERIFY usw.). Im ein- 
zelnen sind folgende Gemeinsamkeiten und Unterschiede zu beachten: 
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a) Applesoft-Befehlsnamen werden speicherintern als sog. Tokens (= 1-Byte- 
Verschlüsselungen) gepackt gespeichert; z.B. ist der interne Code $BA (dezimal 186) 
das Token für PRINT. Nur während der Eingabe einer neuen Programmzeile oder 
während des Listens eines Programms erscheinen die Tokens ‚ausgeschrieben‘. 
Umgekehrt werden die DOS-Befehlsnamen als Bestandteile eines Applesoft- 
Programms stets „‚ausgeschrieben‘‘, d.h befinden sich so im Speicher, wie man sie 
beim Listen sieht (als ASCII-Folge mit Bit 7 off). Dafür können DOS-Befehlsnamen 
als String-Variablen deklariert werden, was bei Applesoft-Befehlsnamen nicht mög- 
lich ist. Beispiel: 


10 L$ = „LIST“ : REM nicht erlaubt! 
20 C$ = „CATALOG“: REM erlaubt 


b) Genau wie bei Applesoft müssen auch bei DOS die Befehlsnamen in Großbuch- 
staben geschrieben werden, also List und Catalog falsch, LIST und CATALOG 
richtig. DOS-Befehlsnamen sind 2 - 8 Zeichen lang. 


2.3. Direkte und indirekte DOS-Befehle 


Ähnlich wie bei Applesoft gliedert man bei DOS die Befehle in zwei Gruppen: 


2.3.1. Direkt- UND Indirektbefehle 


Direkt- UND Indirektbefehle lassen sich SOWOHL über die Tastatur ALS AUCH 
aus Applesoft-Programmen (sowie Integer- und Assembler-Programmen) heraus ge- 
ben. 


Direktbefehl (Tastatureingabe-Modus, Nicht-RUN-Modus): 


Der Tastatureingabe-Modus (immediate mode) liegt dann vor, wenn sich das 
„Prompt‘‘ Ü (oder beim amerikanischen Apple die eckige Klammer) am linken Bild- 
schirmrand befindet und dahinter der ‚‚Cursor‘* (Schreibmarke) blinkt. 


Der DOS-Direktbefehl unterscheidet sich vom Applesoft-Direktbefehl durch folgen- 
des: 


— Im Applesoft können mehrere Direktbefehle gleichzeitig in einer Zeile eingege- 
ben werden, z.B. 
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HOME : PRINT 7 + 3 : LIST 10 

Bei DOS-Befehlen ist dies nicht möglich; z.B. würde 
CATALOG : CATALOG 

zu einer Fehlermeldung führen. 


— Darüber hinaus können DOS-Direktbefehle nur nach einem Return eingegeben 
werden, d.h. der Cursor (Ü bei Applesoft) muß sich am linken Bildschirmrand 
befinden. 


Indirektbefehl (Programm-Modus, RUN-Modus): 

Einem DOS-Indirektbefehl muß stets ein Return oder CHR$(13) und ein Ctrl-D oder 
CHR$(4) vorangehen und der Befehl muß in Anführungszeichen gesetzt und als 
PRINT-Befehl ausgeführt werden, der mit einem Return endet. 

Richtige Beispiele: 

10 D$ = CHRS$(4) : PRINT D$;,, CATALOG“ 


oder 


10 D$ = CHR$(4) : PRINT D$,, CATALOG“ : REM Semikolon zwischen D$ und 
„CATALOG“ darf fehlen! 


oder 

10 PRINT CHR$(4),,, CATALOG“ 

oder 

10 PRINT CHR$(4),, CATALOG“ 

oder 

10 PRINT „DCATALOG“ : REM Hier steht das D für ein eingegebenes Ctrl-D 
oder 


10X$ = CHR$(4) + „CATALOG“ : PRINT X$ : REM Variablen-Zuweisung er- 
laubt! 
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oder 


10 D$ = CHR$(4) :C$ = „CATALOG“ : PRINT D$;C$ 


oder 


10 PRINT CHRS$(4) „CATALOG“ : PRINT CHR$(4) „CATALOG“ : REM 
Mehrfachbefehle in einer Programmzeile erlaubt! 


Falsche Beispiele: 
10 PRINT „CATALOG“ : REM Ctrl-D fehlt! 
oder 


10 CATALOG : REM PRINT, Citrl-D und Anführungszeichen fehlen! 


oder 


10 PRINT CHR$(4);,, CATALOG“; : REM Semikolon nach CATALOG unter- 
drückt Retum! 


Folgende DOS-Befehle können sowohl in Direkt- wie Indirektmodus gegeben wer- 
den: 


LOAD 
RUN 
SAVE 
BLOAD 
BRUN 
BSAVE 
CATALOG 
VERIFY 
RENAME 
DELETE 
LOCK 
UNLOCK 
MON 
NOMON 
PR# +Slot 
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IN # + Slot 
EXEC 
CLOSE 


CHAIN (nur Integer-Basic!) 
INIT () 

MAXFILES (!) 

FP() 

INT () 


Bei den mit Ausrufezeichen markierten Befehlsnamen ist Vorsicht im Programm- 
Modus geboten. Näheres steht bei den einzelnen Befehlserläuterungen. 


2.3.2. NUR Indirektbefehle 


Reine Indirektbefehle lassen sich nur aus dem Programm heraus geben. Es sind dies 
die Befehle: 


OPEN 
READ 
WRITE 
POSITION 
APPEND 


Es handelt sich hierbei ausschließlich um sog. Textfile-Befehle. 


2.4. Parameter Slot, Drive, Volume 


DOS-Befehle können durch sog. Parameter näher bestimmt werden. Es sind dies die 
allgemeinen Parameter Slot (S), Drive (D) und Volume (V) sowie einige befehlsspezi- 
fische Parameter wie L{ength) usw., die bei den einzelnen Befehlen behandelt wer- 
den. Die Reihenfolge der Parameter ist gleichgültig. Das Betriebssystem merkt sich 
die zuletzt definierten Parameter, so daß man die Parameter nicht ständig wiederho- 
len muß. Beispiele: 


CATALOG, S6,D1 oder 
CATALOG, D1,56 
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Wie ersichtlich, werden die Parameter vom Befehlsnamen durch Kommas abge- 
grenzt. Aus diesem Grunde darf ein Dateiname niemals ein Komma enthalten! 


1. Slot = S (Steckplatz; Werte 1-7) 


Der Slot-Parameter ist im Bereich 1-7 (beim Apple II Plus wegen einer möglichen 
RGB-Karte in Slot 7 nur im Bereich 1-6) möglich, z.B. 


CATALOG, 54 
2, Drive = D (Laufwerk, Werte 1-2) 
Der Drive-Parameter kann | oder 2 sein, z.B. 


CATALOG, DI 
CATALOG, D2 


3. Volume = V (DPisketten-Nummer, Werte 0-254) 


Eine Diskette kann eine Nummer erhalten, die ausschließlich beim Initialisieren fest- 
gelegt wird und nachträglich praktisch nicht mehr geändert werden kann (weil die 
Volume-Nummer im sog. Adreßfeld, einem Art Vorspann zu jedem 256-Byte- 
Sektor, beim Formatieren verankert wird.) 


Der zulässige Bereich für Volume-Nummern ist 1-254, z.B. 


INIT MEIER, Vl 
INIT MEIER, V10 


Sonderfall: 
INIT MEIER, VO 
INIT MEIER (ohne Parameter) 


ergibt stets die Volume-Nummer 254. 


Der Nutzen der Volume-Nummer ist gering, da DOS nicht in der Lage ist, automa- 
tisch zu ermitteln, auf welchem Slot und Drive sich eine mit einer Volume-Nummer 
spezifizierte Diskette befindet. (Dies ist z.B. bei Pascal und ProDOS in bezug auf die 
Volume-Names möglich.) 
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Die Volume-Nummer spielt dagegen bei Festplattenlaufwerken (z.B. Corvus) eine 
große Rolle, da z.B. die Corvus in 50-100 Volumes eingeteilt ist, je nach Größe des 
Plattenspeichers. 


Die Parameter S, D und V sind bei fast allen Befehlen möglich. Ausnahmen: 


— bei CATALOG wird der V-Parameter ignoriert 

— bei bestimmten Befehlen sind die Parameter weder sinnvoll noch möglich, z.B. 
MON, NOMON, MAXFILES 

— bei CLOSE sind Parameter nicht erforderlich (und auch nicht zulässig), da die- 
ser Befehl als einziger vollautomatisch alle Dateien auf allen Laufwerken schlie- 
Ben kann. 

— als sehr lästig erweist es sich, dal} bei den READ- und WRITE-Befehlen keine 
Parameter zulässig sind (wie man dies umgeht, siehe weiter unten) 


Gesamtaufstellung (in Beispielen): 


INIT,S6,D1,V1 
CATALOG,S5,D2 (kein V) 
RENAME ALT,NEU,S6,D1,V1 
DELETE ALT,S2,D2,V100 
LOCK DATEI,S6,D1,V1 
UNLOCK DATELS6,D1,V1 
VERIFY DATEI,S6,D2,VO 


SAVE PROGRAMM,S6,D1,V5 

LOAD PROGRAMM ,535,D2,VO 

RUN HELLO,S6,D1,V254 

BSAVE BILD,A$4000,1$2000,56,D1,V1 
BLOAD BILD,S6,D1,V1 

BRUN MASCHINENPROGRAMM,S6,D1,V1 
EXEC EXECUTIVE.FILE,S56,D2,V10 
CHAIN INTEGER. PROGRAMM, S6,D1,V1 


MON (kein S,D,V) 
NOMON (kein S,D,V) 
MAXFILES 3 (kein S,D,V) 
FP (normal kein S,D,V) 
INT (normal kein S,D,V} 
PR#6 (nur S) 

IN#2 (nur S) 
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10 PRINT CHR$(4);,,OPEN DATEI,S6,D1,V1“ 
10 PRINT CHRS$(4);,,‚CLOSE DATEI“ (kein S,D,V) 

10 PRINT CHRS(4); ‚WRITE DATEI“ (kein S,D,V) 

10 PRINT CHR$(4):,,READ DATEI“ (kein S,D,V) 

10 PRINT CHRS$(4);,,APPEND DATELS6,D1,V1“ 

10 PRINT CHRS$(4);,‚POSITION DATEI“ (kein S,D,V) 


2.5. Einfache DOS-Befehle 


Als einfach bzw, unkompliziert können alle diejenigen DOS-Befehle bezeichnet wer- 
den, die nicht mit Textfiles zusammenhängen. 


2.5.1. INIT, CATALOG, LOCK, UNLOCK, VERIFY, DELETE, 
RENAME 


INIT dient — wie bereits geschildert — zum Initialisieren fabrikneuer oder zum Rei- 
nitialisieren bereits früher initialisierter (= formatterter) Disketten: 


10 PRINT „ZU FORMATIERENDE LEERDISKETTE EINLEGEN!“ 
20 INPUT „WELCHE VOLUME-NUMMER (1-254):;X$ 

30 PRINT CHR$(4),,INIT DATENDISK“; „, ‚V“;VAL(X$) 

40 PRINT CHR$(4),, DELETE DATENDISK“ 

50 GOTO 20 


Dieses kleine Programm würde jeweils nach der gewünschten Volume-Nummer fra- 
gen und dann die eingelegte Leerdiskette initialisieren und im Anschluß daran den 
Hello-Namen (= Boot-Programm-Namen) wieder löschen. Wenn sich auf einer Dis- 
kette kein Hello-Programm mehr befindet, bootet die Diskette trotzdem korrekt, 
doch erfolgt dann die Meldung „FILE NOT FOUND“, weil dieses Programm ja 
jetzt nicht mehr existiert. 


Wie aus diesem Beispiel ersichtlich, ist es zwar möglich, aus einem Programm heraus 
zu initialisieren, doch sollte man unbedingt eine Warnmeldung einbauen, damit 
nicht aus Versehen eine wertvolle Datendiskette durch die Initialisierung zerstört 
wird. 


Die Befehle CATALOG, LOCK, UNLOCK und VERIFY sind bereits bekannt. 
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Auch die Befehle RENAME (Dateiname umbenennen) und DELETE (Datei lö- 
schen) verstehen sich von selbst. Die Syntax ist bei RENAME: 


RENAME ALTER NAME, NEUER NAME 


RENAME ist im DOS nicht narrensicher implementiert mit der Folge, daß es mög- 
lich ist, mit RENAME zwei gleiche Dateinamen auf der Diskette zu erzeugen. Neh- 
men wir an, die Diskette enthalte bereits die Files 


PROGRAMM.] 
PROGRAMM. 


Mit RENAME PROGRAMM. 1,PROGRAMM.2 würde man dann auf der Diskette 
zwei gleiche Dateinamen erzeugen: 


PROGRAMM.2 
PROGRAMM.2 


Da die LOAD-, BLOAD-Befehle usw. die Suche nach dem zuerst gefundenen Datei- 
namen abbrechen, würde man das ehemalige, eigentliche PROGRAMM.2 niemals 
mehr einladen können. Man muß dann schleunigst den oberen Dateinamen mit RE- 
NAME PROGRAMM.2,PROGRAMM.I wieder zurückbenennen. 


Demo-Programm: 


100 HOME : INPUT „DISKETTE EINLEGEN ‘;X$ 
110 PRINT CHR$(4),,SAVE XXX“ 

120 PRINT CHR$(4),, CATALOG“ 

130 PRINT CHR$(4),,LOCK XXX“ 

140 PRINT CHR$(4),, CATALOG“ 

150 PRINT CHR$(4),,ÄUNLOCK XXX“ 

160 PRINT CHR$(4),,‚ CATALOG XXX“ 

170 PRINT CHR$(4),,RENAME XXX ,YYY“ 

180 PRINT CHRS(4),, CATALOG“ 

190 PRINT CHR$(4),,DELETE YYY“ 

200 PRINT CHR$(4),, CATALOG“ 

210 PRINT „JETZT KOMMT 'FILE NOT FOUND '-MELDUNG“ 
220 PRINT CHR$(4),,VERIFY YYY“ 


Warum kommt am Ende dieses Programmes eine Fehlermeldung? 
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2.5.2. FP und INT 


FP steht für Floating Point Basic (= Fließkomma-Basic = Applesoft) und INT 
steht für Integer Basic (= Ganzzahl-Basic). Der Apple IIe sowie der Apple II Plus 
haben Applesoft im ROM (im Bereich $D000-$FFFF), während der Uralt-Apple II 
Integer-Basic im ROM hatte. Die ‚‚System Master‘‘-Diskette lädt automatisch nach 
dem Booten Integer-Basic in die Language Card (RAM-Bereich $D000-$FFFF). Mit 
INT kann man dann zu Integer umschalten, und mit FP wieder zu Applesoft zu- 
rückschalten. Da Integer-Basic meistens nicht mehr benutzt wird, hat der FP-Befehl 
heute eine andere Bedeutung. Wenn man sich im Applesoft-Modus befindet und FP 
eingibt, dann wird 


1. die Speicherstelle 2048 (hexadezimal $0800) gelöscht (Dies macht NEW nicht. 
Wäre hier ein anderer Wert außer 0, dann würde RUN nicht mehr funktionieren.) 
2. HIMEM (Highest Memory = Obergrenze des freien Speichers) auf 38400 (hexa- 
dezimal $9600) zurückgesetzt, womit gleichzeitig MAXFILES 3 eingestellt wird, und 
3. der NEW-Befehl ausgeführt. 


FP ist damit wirkungsvoller als NEW allein. FP ist praktisch der einzige Befehl, der 
HIMEM normalisiert. (Falls sich das DOS selbst in der Language Card befindet, be- 
wirkt FP in der Regel HIMEM $BF00.) Der String-Pool von Applesoft beginnt übri- 
gens bei HIMEM-I, also bei $95FF. 


FP und INT als Indirektbefehle bewirken den sofortigen Programmabbruch und das 
Löschen des jeweiligen Programms, z.B. 


1000 PRINT CHRS(4),,FP“ 


2.5.3. MAXFILES 


MAXFILES heißt ‚‚maximum number of files‘‘ = maximale Puffer- und damit Da- 
teianzahl. Für jede geöffnete Datei wird ein 595 Bytes umfassender Zwischenpuffer 
angelegt. Die normalerweise 3 automatisch nach dem Booten angelegten Puffer be- 
finden sich in dem Bereich 


$9600-$9CF8 (dezimal 38400-40184); (40184-38400 +1) : 595 = 3 


Wenn Befehle wie CATALOG, LOAD, VERIFY usw. ausgeführt werden, wird 
vorübergehend 1 Puffer benötigt. Der zuerst belegte Puffer ist der Puffer ab $9600. 
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Nach Beendigung des CATALOG-Befehls usw. wird der Puffer wieder frei. Mit 
dem Befehl MAXFILES + Zahl, z.B. 


MAXFILES 5 


kann man die Anzahl der Puffer festlegen. Es sind maximal 16 Puffer möglich, wo- 
bei z.B. bei MAXFILES 4 HIMEM um 595 Bytes niedriger gesetzt wird als $9600, 
d.h. je mehr Puffer, desto weniger freier Speicherraum. (Wenn DOS in die Lan- 
guage Card verschoben wurde, hat man in der Regel nur maximal 5 Puffer zur Ver- 
fügung, die automatisch ständig benutzt werden können, so daß hier der MAX- 
FILES-Befehl wirkungslos ist.) 

Im einzelnen gilt für normales DOS in den unteren 48K: 


MAXFILES 1 = HIMEM: 39590 = $9AA6 
MAXFILES 2 = HIMEM: 38995 = $9853 
MAXFILES 3 = HIMEM: 38400 = $9600 (Normalfall) 


Hl 


Der momentane Wert von HIMEM läßt sich übrigens ermitteln mit: 
PRINT PEEK (115) + PEEK (116) : 256 


MAXPFILES darf aus einem Programm heraus nur dann geändert werden, wenn zu- 
vor entweder keine Strings definiert wurden oder der Variablen-Speicher mit 
CLEAR gelöscht wurde. MAXFILES definiere man deshalb am besten als erste Zei- 
le des Applesoft-Programms, z.B.: 


10 CLEAR : PRINT CHR$(4),,MAXFILES 1“ 


MAXFILES spielt insbesondere bei Textfiles eine Rolle, da für jeden durch OPEN 
geöffneten Textfile ein Puffer eingerichtet wird, z.B.: 


10 CLEAR : PRINT CHR$(4),,MAXFILES 4° 
20 PRINT CHR$(4),, OPEN DATEI.1“ 

30 PRINT CHR$(4),, OPEN DATEL2“ 

40 PRINT CHR$(4),, OPEN DATEL3‘“ 

50 PRINT CHR$(4),, OPEN DATEL4“ 

60 PRINT „Achtung:““ 

70 PRINT ‚Jetzt kommt Meldung“ 

80 PRINT ‚NO BUFFERS AVAILABLE“ 

9 PRINT CHR$(4),, CATALOG“ 
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Da hier nur 4 Puffer angelegt wurden, war kein Puffer mehr für den CATALOG- 
Befehl zur Verfügung. 


2.5.4. MON und NOMON 


MON kommt von ‚‚to monitor‘ = überwachen. MON bedeutet DOS-Befehle über- 
wachen, NOMON DOS-Befehle nicht mehr überwachen. Mit Überwachen ist ge- 
meint, daß bei einem laufenden Programm die DOS-Befehle sowie bei Textfiles dar- 
über hinaus die eingelesenen oder gespeicherten Daten am Bildschirm sichtbar wer- 
den. Es gibt folgende spezifische Parameter: 


C = Command = DOS-Befehle werden sichtbar 
I = Input = eingelesene Textfiles werden sichtbar (während des Einlesens) 
OÖ = Output = gespeicherte Textfiles werden sichtbar (während des Speicherns) 


Beispiele: 


MON C,LO 

NOMON C,1,O (auch NOMONCIO, d.h. Kommas entbehrlich) 
MON C 

NOMON C 

usw, 


Man beachte, daß die Befehle MON und NOMON ohne Parameter wirkungslos 
sind. 


2.5.5. PR#S und IN#S 


Diese Befehle steuern den Output (PR # + Slot) und Input (IN # + Slot) von Peri- 
pheriegeräten. Beispiele: 


— mit PR#1 wird der Drucker aktiviert, falls in Slot 1 ein Drucker-Interface 
steckt und der Drucker bereits eingeschaltet wurde, d.h. auf ON LINE steht. 

— mit PR#6 oder auch IN#6 wird das DOS gebootet, falls sich ein DOS- 
Controller in Slot 6 befindet. 

— mit PR#3 wird die 80-Zeichen-Karte eingeschaltet, falls sich eine solche in Slot 
3 befindet, usw. 


Aus dem Programm heraus sollten diese Befehle steht mit Ctrl-D ausgeführt werden, 
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da sonst die sog. DOS-Vektoren und damit das DOS ‚‚abgehängt‘‘ werden. 

10 PRINT CHR$(4),,PR#1“ 

würde den Drucker einschalten und gleichzeitig das DOS angeschlossen lassen. 
10 PR#0: IN#0: PR#1 

würde den Drucker zwar ebenfalls einschalten, aber das DOS komplett abhängen. 
10 PR#0 :: IN#0 : CALL 1002 


würde dann nach Beendigung des Druckvorgangs das DOS wieder ordnungsgemäß 
„anhängen‘‘. 

Das planmäßige, vorübergehende „Abhängen‘‘ des DOS mit PR#0 : IN#0 und 
das spätere „‚Anhängen‘‘ mit PR#0: IN#0: CALL 1002 hat den Vorteil, daß die 
Bildschirm- und Druckergeschwindigkeit während des abgeschalteten DOS größer 
ist. Weiteres Beispiel: 


10 PR#0: IN#0: REM DOS ABGEHÄNGT 

20 FORX = 1 TO 10 

30 PRINT „AAAAAAAAAA“ 

40 NEXTX 

50 PR#1 

60 FORX = 1 TO 10 

70 PRINT „AAAAAAAAAA“: NEXTX 

80 PR#0: IN#0 

90 PRINT CHR$(4) „CATALOG“ : REM WIRKUNGSLOS 

100 PR#0 : IN#0 : CALL 1002 : PRINT CHR$(4) „CATALOG“ 


2.5.6. LOAD, RUN, SAVE (Basicfiles) 


LOAD, RUN und SAVE sind die DOS-Befehle zum Laden (= LOAD), Laden 
UND Starten (= RUN) sowie zum Speichern (= SAVE) von Applesoft- und 
Integer-Programmen (= Basicfiles). Die Handhabung dieser Befehle ist denkbar ein- 
fach, da das DOS die Berechnung der Länge des jeweiligen Programms selbst über- 
nimmt. Beispiele: 


LOAD HELLO 
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RUN HELLO 
SAVE HELLO 


10 PRINT „DIES IST PROGRAMM.I‘“ 
1000 PRINT CHR$(4) „RUN PROGRAMM.2“ 


Programme lassen sich aus einem Program heraus starten. Allerdings gehen dadurch 
alle Variablen von Programm.1 verloren. 


10 PRINT „DIES IST EIN PROGRAMM, DAS SICH SELBST SPEICHERT“ 
20 PRINT CHR$(4) „SAVE PROGRAMM“ 


Programme lassen sich aus dem Programm heraus selbst speichern, doch ist dies 
normalerweise nicht besonders sinnvoll. 


Basic-Programme werden normalerweise ab 2048 +1 (= $0800+1) in den RAM- 
Speicher geladen. Start- und Endadresse eines Applesoft-Programms kann man bei 
Bedarf manuell ermitteln durch folgende Formeln: 


Startadresse: PRINT PEEK (103) + PEEK (104) : 256 
Endadresse: PRINT PEEK (175) + PEEK (176) 256 


Auf der Diskette werden Basic-Programme als Speicherauszüge ab $0801 bis zum 
Programmende inclusive 4 Hex-Codes $00 nach dem Programmende und mit einem 
2 Bytes langen Vorspann, der die Länge beinhaltet (in hexadezimal, Low Byte — 
High Byte), gespeichert. (Nach den 4 Hex $00 wird infolge eines DOS-Fehlers 1 wei- 
teres Byte gespeichert.) 


Basicfiles sind aus dem Catalog wie folgt ersichtlich: 


A steht für Applesoft 
I steht für Integer 


Dagegen steht B für Binärfile und T für Textfile. 


2.5.7. BLOAD, BRUN und BSAVE (Binärfiles) 


Diese Befehle beziehen sich auf sog. Binärfiles, d.h. auf Maschinenprogramme sowie 
reine Speicherauszüge, z.B. Hires-Bilder, Grafik-Shapes usw. BLOAD steht für bi- 
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näres Laden, BRUN für binäres RUN (ausschließlich von Maschinenprogrammen) 
und BSAVE steht für binäres Speichern. 

Der BSAVE-Befehl verlangt als Parameter die Startadresse (A) sowie die Länge (L) 
in entweder dezimaler oder hexadezimaler Schreibweise (auch gemischt möglich), 


2.B.: 


BSAVE BILD, A$2000, L$2000 oder 
BSAVE BILD, A8192, L8192 oder 
BSAVE BILD, A$2000, L8192 oder 
BSAVE BILD, A8192, 152000 


Angenommen, im RAM ab $0300 sei Nachstehendes gespeichert: 
0300: 01 02 03 04 05 06 
Wollte man dies auf der Diskette speichern, so würde folgender Befehl genügen: 


BSAVE TEST,AS$0300,1L$0006 oder kürzer 
BSAVE TEST,A$300,L$6 (Führende Nullen können weggelassen werden.) 


Der entsprechende Disketten-Sektor würde dann so aussehen: 


00 03 06 00 01 02 03 04 05 06 


Die ersten zwei Bytes sind die Startadresse (00 03 — 0300 — $0300 — also zuerst 
Low Byte, dann High Byte) 

Die nächsten zwei Bytes sind die Länge (06 00 — 00.06 — $0006 — wieder Low Byte 
first) 


Für vierstellige, hexadezimale Zahlen im Bereich $0000-$FFFF gilt folgende Umrech- 
nungsformel: 


Low Byte + (High Byte : 256) 


Mit BLOAD wird der Binärfile genau an diejenige Stelle eingeladen, die beim voran- 
gehenden BSAVE spezifiziert wurde. Man kann einen Binärfile allerdings auch an ei- 
ne andere Stelle bloaden durch Spezifikation einer neuen Startadresse. Leider gibt es 
beim DOS keinen Befehl, der die Startadresse und Länge eines Binärfiles anzeigt, so 
daß man mit den folgenden Formeln die Berechnung selbst vornehmen muß: 
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BLOAD-Startadresse: PRINT PEEK (43634) + PEEK (43635) - 256 
BLOAD-Länge: PRINT PEEK (43616) + PEEK (43617) 256 (vel. S. 67') 


Wenn das DOS in die Language Card verschoben wurde, wird in der Regel anstelle 
des INIT-Befehls ein entsprechender Befehl implementiert, z.B. PAD bei Diversi- 
DOS. 


Der BRUN-Befehl darf nur bei Maschinenprogrammen angewandt werden. BRUN 
lädt zunächst den Binärfile und springt dann zur Startadresse. 


Die Länge eines Binärfiles darf 32767 (= $7FFF) normalerweise nicht überschreiten. 
Die Startadresse kann im Bereich 0-65535 ($0000-$FFFF) liegen. 


Als freie Bereiche für Binärfiles kommen in Frage: 


$0200-$02FF (nur für vorübergehend benötigte Startprogramme, da dies der Tasta- 
tureingabepuffer ist) 

$0300-$03CF 

$0803-$095FF (Maschinenprogramme sollte man besser ab $803 statt $800 beginnen 
lassen, da Applesoft dann ‚‚denkt‘‘, daß kein Programm geladen wurde.) 


Wenn sich DOS in der Language Card befindet, kann man auch noch den Bereich 
$9600-$BEFF benutzen. Umgekehrt, wenn sich DOS nicht in der Language Card be- 
findet, stehen die oberen 16K des RAM-Speichers ebenfalls für Maschinenprogram- 
me zur Verfügung. 


Zusammenfassend gilt für Applesoft-, Integer- und Binär-Files folgender 
‚„‚Vorspann‘‘ auf dem ersten Datensektor des Files auf der Diskette: 


1. Integer: Low Byte + High Byte der Länge, 
danach Programm, 
danach 4 Hex-Codes 00 


2. Applesoft: Low Byte + High Byte der Länge, 
danach Programm, 
danach 4 Hex-Codes 00 


3. Binärfile: Low Byte + High Byte der Startadresse, 
Low Byte + High Byte der Länge, 
danach eigentlicher Binärfile 
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2.5.8. CHAIN 


Der CHAIN-Befehl sei hier nur der Vollständigkeit halber erwähnt. Er gilt nur für 
das kaum noch benutzte Integer-Basic und dient dem Zweck, aus einem Integer- 
Programm heraus ein weiteres Integer-Programm mit RUN zu starten, ohne daß da- 
durch die Variablen zerstört werden, z.B.: 


1000 PRINT „D CHAIN ZWEITPROGRAMM“ : REM D = CTRL-D 


Für Applesoft befindet sich auf der ‚‚System Master‘‘-Diskette eine ähnliche 
Maschinen-Routine, die jedoch nicht immer funktioniert. Auch bei Applesoft- 
Compilern wie TASC usw. funktioniert das ‚„‚Chaining‘‘ nur teilweise. Für Besitzer 
von RAM-Karten, z.B. der Apple IIe 64K Karte, gibt es eine viel sicherere Lösung. 
Man speichert die Variablen auf der schnellen RAM-Disk, startet das nächste 
Programm-Modul und lädt schließlich die zwischengespeicherten Variablen von der 
RAM-Karte wieder zurück. Ein RAM-Disk-Driver ist im Teil II dieses Buches als Li- 
sting abgedruckt. 


2.6. Textfile-Befehle 


2.6.1. OPEN, READ, WRITE, CLOSE 


Informationstheoretisch gesehen gibt es zwei grundsätzlich verschiedene Arten von 
Dateien, nämlich 


l.  Programm-Dateien, z.B. Applesoft-, Integer- und Assemblerprogramme, so- 
wie 
2.  Daten-Dateien, z.B. Adressen, Briefe, Bilder, Meßwerte usw. 


Basicfiles (A, I) sind stets Programm-Dateien. Binärfiles sind demgegenüber teils 
Programm-Dateien (z.B. Assemblerprogramme) und teils Daten-Dateien, z.B. 
Hires-Bilder, binär abgespeicherte Zahlen-Arrays usw. 


Die typische und zugleich wichtigste Daten-Datei für sowohl Applesoft- wie auch 
Maschinen-Programme ist der sog. Textfile. Textfile bedeutet wörtlich Text-Datei 
(String-Datei, Zeichenketten-Datei), doch können Textfiles auch Zahlen-Dateien 
beinhalten. 
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Beispiel: Strings 


AAAAA 
BBBBB 


10 PRINT CHR$(4) „OPEN STRINGS“ 
20 PRINT CHR$(4) „WRITE STRINGS“ 
30 PRINT „AAAAA“ 

40 PRINT „BBBBB‘ 

50 PRINT CHR$(4) „CLOSE“ 


10 PRINT CHR$(4) „OPEN STRINGS“ 
20 PRINT CHR$(4) „READ STRINGS“ 
30 INPUT A$ 

40 INPUT B$ 

50 PRINT CHR$(4) „„CLOSE“ 


Beispiel: Zahlen 


11111 
22222 


10 PRINT CHR$(4) „OPEN ZAHLEN“ 
20 PRINT CHR$S(4) „WRITE ZAHLEN“ 
30 PRINT 11111 

40 PRINT 22222 

50 PRINT CHR$S(4) „CLOSE“ 


10 PRINT CHR$(4) „OPEN ZAHLEN“ 
20 PRINT CHR$(4) „READ ZAHLEN“ 
30 INPUT ZI 

40 INPUT Z2 

50 PRINT CHR$(4) „CLOSE“ 
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Aus den Beispielen können wir folgendes ersehen: 


1. Ein Textfile, gleichviel ob er neu angelegt wird oder bereits existiert, d.h. bereits 
früher angelegt wurde, wird mit OPEN + DATEINAME geöffnet. Wenn eine 
Datei bereits angelegt war und nunmehr durch neue Werte überschrieben wer- 
den soll, so empfiehlt es sich, falls der neue Datei-Inhalt kleiner als der alte 
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wird, die Altdatei zunächst zu löschen, da sonst die Neudatei auf der Diskette 
den gleichen Raum einnehmen wird wie die Altdatei. Beispiel: 


10 REM ALTDATEI MIT 1000 STRINGS 

20 PRINT CHR$(4) „OPEN TEST“ 

30 PRINT CHR$(4) „WRITE TEST“ 

40 FOR X = 1 TO 1000 : PRINT „AAAAA“ : NEXTX 
50 PRINT CHR$(4) „CLOSE“ 


10 REM NEUDATEI MIT 500 STRINGS 

20 PRINT CHR$(4) „OPEN TEST“ 

30 PRINT CHRS$(4) „DELETE TEST“ 

40 PRINT CHR$(4) „OPEN TEST“ 

50 PRINT CHR$(4) „WRITE TEST“ 

60 FORX = 1 TO 500 : PRINT „AAAAA“ : NEXTX 
70 PRINT CHR$(4) „CLOSE“ 


Bemerkungen: 


a) Die Zeile 20 bei dem Neudatei-Programm kann entfallen, falls man sicher ist, 
daß sich auf der Diskette bereits eine Datei dieses Namens befindet. Ist man 
sich jedoch unsicher, ob die TEST-Datei bereits existiert, dann kann man mit 
OPEN — DELETE — OPEN die ‚FILE NOT FOUND“-Fehlermeldung um- 
gehen. 


b) Hätte man die Neudatei nicht zunächst gelöscht, dann würde die Neudatei wei- 
terhin auf der Diskette denselben Raum wie die Altdatei einnehmen, weil DOS 
nach dem CLOSE die nunmehr überflüssigen, restlichen Altdatei- 
Datensektoren nicht von selbst löscht. 


2. Nach dem OPEN-Befehl kann wahlweise ein WRITE- oder READ-Befehl fol- 
gen, je nachdem, ob auf die Datei geschrieben oder von ihr gelesen werden soll. 


3. Eine Datei wird normalerweise mit PRINT-Befehlen beschrieben und mit 
INPUT-Befehlen gelesen. 


4. Eine Datei muß mit dem CLOSE-Befehl stets geschlossen werden, auch dann, 
wenn nur von ihr gelesen wurde. Zwar gehen bei Dateien, aus denen nur gele- 
sen wird, keine Daten auf der Diskette verloren, wenn der CLOSE-Befehl ver- 
gessen wurde, doch bleibt dann der für diese Datei bereitgestellte DOS-Puffer 
belegt. Öffnet man z.B. bei Maxfiles 3 den vierten Textfile, ohne zuvor eine der 
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ersten drei geöffneten Textfiles wieder zu schließen, folgt die Meldung ‚NO 
BUFFERS AVAILABLE“ (= keine Puffer mehr frei). Ein fehlender CLOSE- 
Befehl kann auch nach Beendigung des Programms manuell nachgeholt wer- 
den, indem man über die Tastatur CLOSE tippt. CLOSE allein schließt ALLE 
noch offenen Dateien, CLOSE + DATEINAME schließt nur diese letztere 


Datei. Beispiel: 


10 PRINT CHR$(4) „OPEN DATEI.1“ 
15 PRINT | 
20 PRINT CHR$(4) „OPEN DATEI.2“ 
25 PRINT 2 
30 PRINT CHR$(4) „OPEN DATEI3“ 


35 PRINT 3 
40 PRINT CHR$(4) „CLOSE DATEL1“ : REM Schließt nur diese Datei.l 


Was aus den Beispielen nicht unmittelbar evident, jedoch für die Korrektheit der 
Textfile-Befehle erforderlich ist, ist der Umstand, daß die OPEN-, READ- und 
WRITE-Befehle nur dann wirksam werden, wenn ihnen nicht nur ein Cirl-D, son- 
dern auch ein Ctrl-M bzw, Return vorausgeht. 


Falsches Beispiel 1: 


10 PRINT CHR$(4) ‚OPEN TEST“ 

20 PRINT CHR$(4) ‚WRITE TEST“ 

30 PRINT „AAAAA°; : REM Semikolon! 
40 PRINT CHR$(4) „„CLOSE“ 


Kommentar: Der letzte PRINT-Befehl vor dem CLOSE-Befehl darf nicht mit einem 
Semikolon abschließen, da sonst der CLOSE-Befehl nicht ausgeführt wird. Beim 
Beispiel 1 würde auf die Diskette statt „AAAAA“ in Wirklichkeit „AAAAA- 
CLOSE‘“‘ geschrieben, d.h. Ctrl-D + ‚„CLOSE‘“ würde an den String ,„AAAAA“ 
angehängt werden! 


Richtiges Beispiel 1: 


10 PRINT CHR$(4) „OPEN TEST“ 
20 PRINT CHR$(4) „WRITE TEST“ 

30 FORX = I TO3: PRINT „AAAAA“; : NEXTX 
40 PRINT : PRINT CHR$(4) „„CLOSE“ 
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Kommentar: Mehrere PRINT-Befehle mit Semikolon zur Unterdrückung des Re- 
turns sind zulässig, doch muß der letzte PRINT-Befehl ein Return beinhalten. 


Falsches Beispiel 2: 


10 PRINT „SPEICHERN J/N “;: GET X$ 
20 IFX$ = „N“ THEN END 

30 PRINT CHR$(4) „OPEN TEST" 

USW. 


Kommentar: Der GET-Befehl unterdrückt das Return mit der Folge, daß „OPEN 
TEST“ am Bildschirm angezeigt, aber nicht vom DOS als Befehl erkannt wird. 


Richtiges Beispiel 2: 


10 PRINT „SPEICHERN Y/N ‘% : GET X$ 
20 IFX$ = „N“ THEN END 
30 PRINT : PRINT CHR$(4) „OPEN TEST“ 


Kommentar: Hier steht in Zeile 30 ein zusätzliches PRINT, so daß der DOS-Syntax 
Genüge getan wird. 


2.6.2. Struktur eines Textfiles 
Wenn auf die Diskette folgende Datei geschrieben wird 


10 PRINT CHR$(4) „OPEN FILE‘ 
20 PRINT CHR$(4) „WRITE FILE“ 
30 PRINT ‚,‚aaaaa‘ 

40 PRINT ‚‚bbbbb‘“ 

50 PRINT ‚,‚ccccc‘ 

60 PRINT CHR$S(4) „CLOSE“ 


dann hat diese Datei die Struktur: 


aaaaa + Return Feldi 
bbbbb + Return Feld 2 
SCCcc + Returm Feld 3 


+ Ctrl-0 Endmarker 
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Durch Return abgegrenzte ASCII-Folgen (Strings oder Zahlen) werden als Felder be- 
zeichnet. 


Return hat den ASCII-Code 13 oder 141 (hexadezimal $0D oder $8D) und CtrI-O hat 
den ASCII-Code 0 oder 128 (oder hexadezimal $00 oder $80). ASCII ist die Abkür- 
zung für American Standard Code for Information Interchange, d.h. amerikani- 
scher Datenaustausch-Code. Die Tabelle im Anhang zu diesem Buch enthält ei- 
ne erweiterte ASCII-Code-Aufstellung mit den entsprechenden hexadezimalen, bi- 
nären und dezimalen Code-Werten. Bereits ein flüchtiger Blick auf diese Tabelle ge- 
nügt um festzustellen, daß die Tabelle sozusagen doppelt belegt ist, d.h. die Werte 
von 0-127 werden durch die Werte von 128-255 wiederholt. Bei der ersten Hälfte ist 
das Iinke Bit der 8-Bit-Binärverschlüsselung stets O0, bei der zweiten Hälfte stets 1. 
Dieses linke Bit wird Bit 7 genannt, da die Bits von rechts nach links — beginnend 
mit 0 — gezählt werden, Beispiel: 


76543210 = Bit-Positionen 
11110000 = $FO = p 


Insgesamt gibt es also 2 mal 128 verschiedene Zeichen bzw. Codes. Während Apple- 
soft im RAM-Speicher Strings in der Regel mit „‚Bit 7 off“ (Bit 7 = 0; linke Hälfte) 
speichert, werden Strings auf der Diskette in der Regel mit „Bit 7 on“ (Bit 7 = |; 
rechte Hälfte) gespeichert. Return hat damit den Wert 141 (oder $8D). Dagegen wird 
als Ausnahme Ctrl-O auf der Diskette stets als O (oder $00 oder 00000000) gespei- 
chert. Ctrl-O (auch NUL genannt) ist der Endmarker (= die Endmarke = die End- 
markierung) für einen Textfile. Symbolisch würde die obengenannte Datei auf der 
Diskette also wie folgt gespeichert: 


aaaaaRbbbbbRceccceR® 


R = Return = Cirl-M 
0 = Ctrl-O0 = NUL 


Und hexadezimal verschlüsselt würde die Datei so aussehen: 
EIEIEIEIEISDDERBERFE2E2SDE3 E3 E3 E3 E3 SD 0 


(Die Leertasten sind in beiden Fällen nur aus Gründen der besseren Lesbarkeit einge- 
fügt.) 


Bei der ASCH-Tabelle sind die Werte 160-254 (oder $AO-$FE) die sogenannten sicht- 
baren oder druckbaren Zeichen: 
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$AO-SAF: diverse Sonderzeichen 

$BO-$B9: Ziffern 

$BA-$C0O: diverse Sonderzeichen 

$C0-$DA: großes Alphabet 

$DB-$E0: länderspezifische Zeichen (Umlaute) 
$E1-$FA: kleines Alphabet 

$FB-$FE: länderspezifische Zeichen (Umlaute) 


Daneben gibt es noch die Ctrl-Zeichen = Kontroll-Zeichen = Steuerzeichen = nor- 
malerweise nicht sichtbare und keinesfalls druckbare Zeichen: 


$80-$9F: diverse Kontroll-Zeichen 


$FF: DEL-Zeichen (Rückwärts-Löschzeichen) 
ferner 
$00: Endmarker für Textfiles 


Von den Kontroll- oder Steuerzeichen haben zwei für DOS eine besondere Bedeu- 
tung: 


1. Ctrl-D = $84 = DOS-Befehlserkennungszeichen 
2. Ctrl-M = $8D- Feldbegrenzungszeichen 


Ctrl-D und Cirl-M sollten möglichst niemals Bestandteil eines Strings sein, da dies 
sonst zu Schwierigkeiten bei Applesoft-Programmen führt. 


Zahlen = Strings auf der Diskette? 


Textfiles können sowohl Zahlen wie Strings enthalten. Zahlen werden jedoch auf der 
Diskette genauso wie Strings gespeichert, d.h. genau in der Form, wie man Zahlen 
am Bildschirm sieht und nicht etwa in binär verschlüsselter Form, wie sie Applesoft 
speicherintern abgelegt (in sog. gepackter 5-Byte-Verschlüsselung bei Fließkomma- 
zahlen und gepackter 2-Byte-Verschlüsselung bei Ganzzahlen). Beispiel: 


10 PRINT CHR$(4) „OPEN TEST“ 
20 PRINT CHR$(4) „WRITE TEST“ 

30 PRINT „12345“ : REM DIES IST EIN STRING! 
40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 
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60 PRINT CHR$(4) „READ TEST“ 
70 INPUT Z 
80 PRINT CHR$(4) „„CLOSE“ 


Hier wird ‚12345‘ als String gespeichert und als Zahl durch INPUT Z eingelesen. 


10 PRINT CHRS$(4) „OPEN TEST“ 

20 PRINT CHRS$(4) „WRITE TEST“ 

30 PRINT 12345 : REM DIES IST EINE ZAHL! 
40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 

60 PRINT CHR$(4) „READ TEST“ 

70 INPUT S$ 

80 PRINT CHR$(4) „„CLOSE“ 


Hier wird 12345 als Zahl gespeichert und als String durch INPUT S$ eingelesen. 


Diese beiden Beispiele machen deutlich, daß man als Strings gespeicherte Zahlen als 
Zahlen-Variablen einlesen kann und umgekehrt. Voraussetzung ist natürlich, daß die 
Strings nur Zahlzeichen enthalten, also die Ziffern von 0-9 sowie Dezimalpunkt, 
Plus- oder Minuszeichen sowie E (= Exponent-Zeichen). 


2.6.3. Komma und Semikolon: PRINT und INPUT 


An die WRITE- und READ-Befehle schließen sich üblicherweise die entsprechenden 
PRINT- und INPUT-Befehle an. Um mit Textfiles effektiv umgehen zu können, 
muß man sich zunächst einmal mit den PRINT- und INPUT-Befehlen, die eigentlich 
Applesoft-Befehle sind, vertraut machen. 

PRINT + Zahl oder PRINT + String, z.B. 

PRINT A : PRINT A$ oder 

PRINT 1: PRINT „AAAAA“ 

bewirken normalerweise die Bildschirmanzeige der Zahlen bzw. Strings. Ist ein 
Drucker angeschlossen (mit PR #1), werden die PRINT-Werte gleichzeitig an den 
Drucker geschickt. Ist jedoch eine DOS-Datei geöffnet, dann bewirken die PRINT- 
Befehle das Speichern der Werte auf der Diskette. 


Nach der Basic-Syntax lassen sich 3 PRINT-Arten unterscheiden: 


l. PRINT + Return, z.B. PRINT A 
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2. PRINT + Semikolon, z.B. PRINT A; 
3, PRINT + Komma, z.B. PRINT A, 


Das Semikolon am Ende eines PRINT-Statements unterdrückt das Return und das 
Komma am Ende eines PRINT-Statements bewirkt eine Tabulierung am Bildschirm. 


Der INPUT-Befehi ist normalerweise für die manuelle Tastatureingabe aus einem 
Applesoft-Programm heraus gedacht. Ist jedoch eine DOS-Datei geöffnet, dann be- 
wirkt der INPUT-Statement das Einlesen eines Strings oder einer Zahl von der Dis- 
kette und die Zuweisung zu der spezifizierten Variablen. Während PRINT statt Va- 
riabien auch Konstanten als Parameter haben kann, z.B. 


PRINT | statt PRINT A, wobei A = 1 oder 
PRINT „AAA“ statt PRINT A$, wobei A$ = „AAA'“ 


muß INPUT als Parameter stets eine Variable haben, also 
INPUT A oder INPUT A$ 
Nach der Basic-Syntax lassen sich 2 INPUT-Arten unterscheiden: 


1. INPUT + Return, z.B. INPUT A : INPUT B: INPUT C 
2. INPUT + Komma, z.B. INPUTA,B, C 


Für den ersten Fall gibt es bei Applesoft-Programmen entweder die Möglichkeit, daß 
mehrere INPUT-Statements — getrennt durch Doppelpunkt — in derselben Pro- 
grammzeile stehen 


10 INPUT A : INPUT B: INPUT C 


oder daß die INPUT-Statements auf mehrere Programmzeilen verteilt werden 


10 INPUT A 
20 INPUT B 
30 INPUT C 


Im zweiten Fall müssen die Variablen alle in einer einzigen Zeile stehen und durch 
Return bei der letzten Variablen abgeschlossen werden: 


10 INPUTA,B, C 
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2.6.4. Komma bei Mehrfachfeldern 


Da PRINT-Befehle mit Kommas eigentlich eine Tabulierung bewirken, die natürlich 
auf der Diskette nichts zu suchen hat, sollte man die READ- und WRITE-Befehle 
nach meinen Erfahrungen am besten gar nicht mit Kommas implementieren, da 
man sonst wunderliche Überraschungen erleben kann. 


Falsches Beispiel 1: 


10 PRINT CHR$(4) „OPEN TEST“ 
20 PRINT CHR$(4) „WRITE TEST“ 
30 PRINT 1, 2, 3 

40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 
60 PRINT CHR$(4) „READ TEST“ 
70 INPUT A, B, C 

80 PRINT CHR$(4) „„CLOSE“ 


Kommentar: Auf der Diskette entsteht eine Datei mit der Struktur 


123R 


d.h. die Ziffern sind nicht durch Kommas voneinander abgetrennt, so daß insgesamt 
nur eine einzige Zahl 123 auf der Diskette gespeichert wird mit der Folge, daß bei 
Einlesen nach der Variablen A für B und C keine Werte mehr zur Verfügung stehen. 


Falsches Beispiel 2: 


10 PRINT CHR$(4) „OPEN TEST“ 
20 PRINT CHR$(4) „WRITE TEST“ 
30 PRINT 1,“ 2,“ 3 

40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 
60 PRINT CHR$(4) „READ TEST“ 
70 INPUT A : INPUT B : INPUT C 
80 PRINT CHR$(4) „CLOSE“ 


Kommentar: Auf der Diskette entsteht eine Datei mit der Struktur 


1,2,3R 
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d.h. die Ziffern sind durch Kommas getrennt. Da jedoch der nackte INPUT- 
Staternent (ohne folgendes Komma} ein Return und kein Komma erwartet, bewirkt 
Beispiel 2 ebenso wie Beispiel 1 eine DOS-Fehlermeldung. 


Richtiges Beispiel 3a: 


10 PRINT CHR$(4) „OPEN TEST“ 
20 PRINT CHR$(4) „WRITE TEST“ 
30 PRINT 1 ,," 2 ,,° 3 

40 PRINT CHR$(4) „„CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 
60 PRINT CHR$(4) „READ TEST“ 
70 INPUT A, B, C 

80 PRINT CHR$(4) „„‚CLOSE“ 


Richtiges Beispiel 3b: 


0A=1:B=2:C=3 

20 PRINT CHR$(4) „OPEN TEST“ 
30 PRINT CHR$(4) „WRITE TEST“ 
40 PRINTA „„“B,," C 

50 PRINT CHR$(4) „CLOSE“ 

60 PRINT CHR$(4) „OPEN TEST“ 
70 PRINT CHRS$(4) „READ TEST“ 
80 INPUT A,B, € 

90 PRINT CHR$(4) „CLOSE“ 





Kommentar: Bei den Beispielen 3a und 3b entstehen wie bei dem Beispiel 2 auf der 
Diskette Files mit der Struktur 


1,2,3R 


Die in Anführungszeichen gesetzen Kommas bewirken, daß diese Kommas auch auf 
der Diskette mitgespeichert werden (im Gegensatz zum Beispiel I, wo die Kommas 
nicht in Anführungszeichen gesetzt wurden). Liest man nun diese Datei mit Komma- 
INPUT-Statements ein, erfolgt eine korrekte Wertzuweisung zu den Variablen A, B 
und C. Es ist also möglich, mit Kommas zu arbeiten, doch ist das folgende Pro- 
gramm erheblich narrensichere, zumal dann eine einheitliche File-Struktur „Feld + 
Return‘ stets gewährleistet wird: 
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10 PRINT CHR$(4) „OPEN TEST“ 
20 PRINT CHR$(4) „WRITE TEST“ 
30 PRINT 1: PRINT 2: PRINT 3 
40 PRINT CHR$(4) „CLOSE“ 

50 PRINT CHR$(4) „OPEN TEST“ 
60 PRINT CHR$(4) „READ TEST“ 
70 INPUT A : INPUT B : INPUT C 
80 PRINT CHR$(4) „CLOSE“ 


Dieses Beispiel erscheint auf den ersten Blick umständlicher als die obigen Beispiele. 
Man mul3 jedoch berücksichtigen, das das Speichern und Einlesen von Textfiles übli- 
cherweise nicht einer Anhäufung von Einzelvariablen darstellt, z.B.: 


10 INPUT Al: INPUT A2 : INPUT A3 : INPUT A4 : INPUT A5 : REM usw. 


denn dies wäre bei einer großen Anzahl von Variablen völlig unökonomisch. Viel- 
mehr werden Textfiles sinnvollerweise als Arrays gespeichert bzw. eingelesen, 2.B.: 


10 DIM A(1000) 
20 PRINT CHR$(4) „OPEN DATEI“ 

30 PRINT CHR$(4) „READ DATEI“ 

40 FOR X = 1 TO 1000 : INPUT A(X) : NEXTX 
50 PRINT CHRS$(4) „CLOSE“ 


Auf diese Weise lassen sich mit wenigen Programmzeilen Tausende von Zahlen oder 
Strings einlesen. 


2.6.5. Semikolon: GET und PRINT CHR$(X) 


Semikolons (oder Semikola) bewirken beim PRINT-Befehl die Unterdrückung des 
Returns sowohl bei der Bildschirmanzeige und Druckerausgabe wie auch bei der 
Speicherung von Textfiles auf der Diskette. In Applesoft ist es praktisch nicht mög- 
lich und auch nicht sinnvoll, Textfiles anzulegen, die keinerlei Returns enthalten. Da 
vor dem CLOSE-Befehl stets ein Return stehen muß, muß ein mit Applesoft erstell- 
ter Textfile zwangsweise ein Return enthalten, z.B. 


10 PRINT CHR$(4) „OPEN TEST“ 

20 PRINT CHR$(4) „WRITE TEST“ 

30 FORX = 1 TO 10000 : PRINT „AAAAAAAAAA; : NEXT 
40 PRINT : PRINT CHR$(4) „CLOSE“ 
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Diese TEST-Datei würde aus 10 mal 10000 = 100.000 A ’s + einem einzigen Return 
am File-Ende bestehen. Eine solche fast Return-lose Datei könnte man jedoch mit 
INPUT-Statements nicht mehr einlesen, da der INPUT-String maximal 239 Zeichen 
lang sein darf. Mit anderen Worten: Applesoft-Programmierer können grundsätz- 
lich nur Textfiles bewältigen, die in Felder eingeteilt sind, wobei die praktikable Feld- 
länge in der Regel ca. 230 Zeichen inkl. Return nicht überschreiten sollte. 

Ein String als solcher darf bis zu 255 Zeichen lang sein, doch kann ein solcher String 
nicht mit INPUT eingegeben werden wegen der Obergrenze von 239 Zeichen. Die 
Definition eines Strings in einer Programmzeile ist sogar auf ca. 230 Zeichen be- 
grenzt, je nachdem, ob die Zeilennummer ein- oder mehrstellig ist: 


100A$ = ‚‚123456789012345678901234567890123456789012345678901234567890123 
45678901234567890123456789012345678%012345678901234567890123456789012345 
67890123456789012345678901234567890123456789012345678%012345678901234567 
89012345678901234567890°“ 


Ein einzelner String mit bis 255 Zeichen kann also nur durch Verkettung entstehen: 
10 A$ = B} + Ch 


Dateien, die keine (oder fast keine) Returns enthalten, lassen sich von einem 
Applesoft-Programm mit GET-Befehlen einlesen. Bei Dateien der obigen Größen- 
ordnung ist jedoch der GET-Statement völlig undiskutabel, das es eine schiere Ewig- 
keit dauern würde, bis diese Datei eingelesen wäre. Probieren Sie es selber einmal 
aus! 


10 PRINT CHR$(4) „OPEN TEST“ 
20 PRINT CHR$(4) „READ TEST“ 

30 FORX = 1 TO 10000 

40 FOR Y = 1TO 10 

50 GET X$ 

60 NEXT Y,Z 

70 PRINT : PRINT CHR$(4) „CLOSE“ 


Wie lange hat es gedauert? 


Übrigens gibt es kein exaktes Gegenstück zum GET-Befehl, denn während der Get- 
Befehl tatsächlich nur zum Einlesen von je einem einzelnen Zeichen von der Diskette 
verwendet werden kann, eignet sich der PRINT-Befehl sowohl zum Speichern einzel- 
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ner Zeichen als auch längerer Zeichenketten (= Strings). Bisweilen ist es erforder- 
lich, daß eine Folge einzelner Zeichen als ASCII-Code in Form von 


PRINT CHR$S(X); 


auf die Diskette gesendet werden müssen, z.B. wenn Binärfiles in Textfiles umge- 
wandelt werden müssen. Ein Beispiel ist hierfür die Umwandlung von Applewriter 
1.1-Binärfiles in normale Textfiles, was an dem nachfolgenden Programm demon- 
striert werden soll: 


2.6.5.1. Applewriter 1.1 Binärfile-Konverter 


100 REM === APPLEWRITER 1.1: BINÄR- IN TEXT-FILE == = 

110 HOME : HTAB 14: VTAB 3: INVERSE : PRINT „APPLEWRITER 1.1“ 

120 HTAB 1: VTAB 7: PRINT „UMWANDLUNG VON B-FILES IN T-FILES“: 
NORMAL 

130 PRINT : PRINT : PRINT „START UN “; 

140 GET X$: IE X$ = „N“ THEN HOME : END 

150 IF X$ < > „J“ THEN 140 

160 PRINT : PRINT : PRINT ‚„LAUFWERK-NR. (1 ODER 2): “; 

170 GET X$: IF X$ < > „I“ AND X$ < > „2“ GOTO 170 

180 D = VAL (X9) 

190 HOME : PRINT : PRINT CHRS$ (4), CATALOG,D“D 

200 INPUT „BSAVE-FILE: TEXT.‘ Y$ 

210 PRINT „VERTIPPT J/N “;: GET X$: IF X$ < > „N“ THEN 190 

220 HOME : PRINT : PRINT CHR$ (4),,BLOAD TEXT.“Y$ 

230 INVERSE : PRINT „ABSPEICHERN DES TEXT-FILES“: NORMAL 

240 PRINT : PRINT : PRINT „LAUFWERK-NR. (1 ODER 2): “; 

250 GET X$: IFX$ <> „1“ ANDX$< > „2“ THEN 250 

260 D = VAL (X) 

270 HOME : PRINT : PRINT CHRS$ (4),,CATALOG,D“D 

280 INPUT „TEXT-FILE: “;Y$ 

290 PRINT „VERTIPPT V/N ‘“: GET X$: IF X$ < > „N“ GOTO 2% 

300 HOME : HTAB 12: INVERSE : PRINT „BITTE WARTEN“: NORMAL : 
POKE 34,2: HOME 

310 PRINT CHRS$S (4),,MON O“ 

320 PRINT CHR$ (4),,OPEN“Y$: PRINT CHR$ (4),DELETE“Y$ 

330 PRINT CHR$ (4),,OPEN“Y$: PRINT CHR$ (4),,WRITE“Y$ 

340 AD = 6401:Z1 = 32:22 = 94:73 = %:Z4 = 128:Z5 = 192:Z6 = 224 
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350 A = PEEK (AD):AD = AD + I 

360 IF A = Z3 THEN 420 

3WIFA> = ZETHENA = A — Z2 

380 IFA> = ZSTHENA = A + ZI 

30 IFA <ZITHENA = A + Z5 

400 IFA <Z2THENA = A + Z4 

410 PRINT CHR$ (A);: GOTO 350 

420 PRINT : PRINT CHRS$ (4),,CLOSE““: PRINT CHRS$ (4),, NOMON 0“: 
PRINT CHR$ (4),, CATALOG“ 

430 POKE 34,0 

440 INVERSE : PRINT „ERNEUT V/N“;: NORMAL : PRINT „, ‘“; 

450 GET X$: IF X$ = „J“ GOTO 110 

460 IFX$ < > „N“ GOTO 450 


Der PRINT CHR$(A)-Befehl steht bei diesem Programm in Zeile 410. Auch dieses 
Programm ist ein Beispiel dafür, wie erschreckend lange es dauert, wenn der Zugriff 
auf einen Textfile auf der Einzelzeichen-Ebene erfolgt. 


2.6.6. Komma, Doppelpunkt und Anführungszeichen bei Strings 


Da Komma, Doppelpunkt und Anführungszeichen syntaktische Funktionen bei dem 
INPUT-Befehl übernehmen (technisch am besten beschrieben in dem alten ‚‚Basic 
Programming Reference Manual‘, S. 66), kann ein auf der Diskette gespeicherter 
String diese Zeichen nicht alle gleichzeitig enthalten. Es gibt nur zwei Möglichkeiten: 


1. Entweder man verzichtet auf die Anführungszeichen (ASCI-Code 34) und 
kann dann Komma und Doppelpunkt als Bestandteile von Strings auf Textfiles 
speichern, 


2. oder man verzichtet auf Komma und Doppelpunkt und kann dann Anfüh- 
rungszeichen als Bestandteile von Strings auf Textfiles speichern. 


Um es klarzustellen: Bei Assembler-Programmen gelten diese Beschränkungen nicht, 
wohl aber bei reinen Applesoft-Programmen. 


Da Komma und Doppelpunkt wichtiger als die doppelten Anführungszeichen (= 
Gänsefüßchen) sind, zumal ja auch noch die einfachen An- und Abführungszeichen 
existieren (ASCIH-Codes 96 und 39; letzerer zugleich Apostroph), kann man zu dem 
folgenden, wenig bekannten Trick greifen: 
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l. Alle auf den WRITE-Befchl folgenden PRINT-Statements werden mit 
CHR$(34) eingeleitet: 


10 A$ = „aaa,aaa:aaa‘ 

20 PRINT CHR$(4) „OPEN TEST“ : PRINT CHR$(4) ‚WRITE TEST“ 
30 PRINT CHR$(34) A$ 

40 PRINT CHR$(4) ‚„CLOSE“ 


Ein Semikolon zwischen CHR$(34) und A$, z.B. 
30 PRINT CHR$(34) ; A$ 
dient nur der besseren Lesbarkeit und ist funktional entbehrlich. 


2. Bei allen auf den READ-Befehl folgenden INPUT-Statements ist keine beson- 
dere Syntax zu beachten, doch muß man wissen, daß bei 


10 PRINT CHR$(4) „OPEN TEST“ : PRINT CHR$(4) „READ TEST“ 
20 INPUT A$ 
30 PRINT CHR$(4) „CLOSE“ 


der Variablen A$ nur der reine String aaa,aaa:aaa und nicht etwa Anführungszei- 
chen + aaa,aaa:aaa zugewiesen wird. 


Der einzige Nachteil dieses Verfahrens ist der, daß nunmehr jedes Feld auf der Dis- 
kette 1 Byte mehr Speicherraum (wegen des Anführungszeichens) beansprucht. Bei 
langen Strings fällt dies jedoch kaum ins Gewicht. Das nachfolgende Programmbei- 
spiel demonstriert das CHR$(34)-Verfahren: 


100 REM == = KOMMA-KOLON-TEST == = 

110 HOME : INVERSE : PRINT „KOMMA-KOLON-READ-WRITE-TEST“: 
NORMAL 

120 PRINT : PRINT : PRINT „STARTEN J/N “;: GET X$: IFX$ = „N“ 
THEN END 

130 IFX$ < > „J“ THEN 110 

140 DIM A$G) 

150 X$ = „STIEHL,ULRICH:HEIDELBERG“ 

160 FORX = 1 TO 3:A$(X) = X$: NEXT 

170 HOME : INVERSE : PRINT „SO HEISST DER STRING:“: NORMAL 

180 PRINT : PRINT X$: PRINT : INVERSE : PRINT „3 X SPEICHERN“: 
NORMAL : PRINT 

190 PRINT CHRS$ (4), MONIO“ 
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200 PRINT CHRS$ (4), OPEN STRINGTEST“: PRINT CHRS$ (4),„DELETE 
STRINGTEST“: PRINT CHRS$ (4),, OPEN STRINGTEST“: PRINT CHRS$ 
(4), WRITE STRINGTEST“ 

210 FORX = 1TO3 


220 REM = = = ENTSCHEIDENDE ZEILE 
230 REM = = = MIT CHR$(34) VOR A$ 
240 PRINT CHR$ (34) A$(X) 

250 NEXT 


260 PRINT CHRS (4),,CLOSE“ 

270 PRINT : INVERSE : PRINT „3 X EINLESEN:“: NORMAL : PRINT 

280 PRINT CHR$ (4),, OPEN STRINGTEST“: PRINT CHRS$ (4),,READ 
STRINGTEST“ 

290 FORX = 1T03 

300 INPUT A$(X) 

310 NEXT 

320 PRINT CHR$ (4),,CLOSE“ 

330 PRINT CHR$ (4), NOMONIO“ 

340 PRINT : INVERSE : PRINT „DAS WURDE EINGELESEN:“: NORMAL : 
PRINT 

350 FORX = 1 TO 3: PRINT AS(X): NEXT 


2.6.7. OPEN-Files 


Die Programmierung wird komplizierter, wenn gleichzeitig mehrere Dateien geöffnet 
sind oder wenn eine Datei nicht geschlossen werden kann, weil laufend oder in Inter- 
vallen auf die Datei zugegriffen wird. 


Der uns bereits bekannte einfachste Fall liegt dann vor, wenn die PRINT- oder 
INPUT-Befehle von WRITE-CLOSE- bzw. READ-CLOSE-Befehlen unmittelbar 
eingeschlossen werden. Was passiert jedoch, wenn zwischendurch Tastatureingaben 
erwartet oder Hinweise am Bildschirm angezeigt werden sollen? In diesem Fall muß 
der READ- oder WRITE-Befehl vorübergehend inaktiviert werden, damit nicht et- 
wa der Bildschirm-Hinweis plötzlich auf der Diskette gespeichert wird. Die vorüber- 
gehende Inaktivierung von READ-WRITE-Befehlen ist denkbar einfach durch einen 
reinen PRINT CHR$(4)-Befehl zu realisieren. (Übrigens führt jeder ANDERE 
DOS-Befehl, z.B. PRINT CHR$(4) „CATALOG“, wegen des Ctrl-D zu einer Inak- 
tivierung des momentanen Read- oder Write-Zustandes.) 
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Beispiel 1: 


10 PRINT CHR$(4) „OPEN DATEI“ 

20 PRINT CHR$(4) : REM INAKTIVERT DOS 
30 PRINT „STRING EINGEBEN!“ 

40 INPUT X$ 

50 PRINT CHR$(4) „WRITE DATEI“ 

60 PRINT X$ : GOTO 20 


Hier würde eine fehlende Zeile 20 zur Folge haben, daß neben der Variablen X$ auf 
der Diskette ungewollt jeweils der String „STRING EINGEBEN!“ mit abgespei- 
chert werden würde. 


Beispiel 2: 


10 PRINT CHR$(4) „OPEN TEST“ 

20 PRINT CHR$(4) „WRITE TEST“ 

30 FORX = 1 TO 100: PRINTX : NEXT 

40 PRINT CHRS$(4) ‚„CLOSE“ 

50 PRINT CHR$(4) ‚OPEN TEST“ 

60 PRINT CHR$(4) : REM INAKTIVIERT DOS 

70 PRINT „ZAHL EINLESEN J/N “: INPUT X$ 

80 IFX$ = „N“ THEN PRINT CHR$(4) „CLOSE“ : END 

9% PRINT CHR$(4) „READ TEST“ : INPUT Z : PRINT Z : GOTO 60 


Hier würde eine fehlende Zeile 60 zur Folge haben, daß bei Zeile 70 mit INPUT X$ 
die nächste Zahi automatisch von der Diskette käme, ohne daß man eine Chance 
hätte, durch Tastatureingabe von ‚‚N‘‘ das Programm abzubrechen. 


Die vorübergehende DOS-Inaktivierung, die übrigens nicht mit dem DOS-, ,Abhän- 
gen‘ durch PR#0 : IN#0 zu verwechseln ist, hat übrigens den Vorteil, daß even- 
tuelle DOS- oder Applesoft-Fehlermeldungen nicht im Falle des WRITE- 
Aktivzustandes aus Versehen auf der Diskette gespeichert werden. 


Wenn mehrere Dateien gleichzeitig geöffnet sind, kommen oft noch die Parameter 
Slot, Drive und Volume zum Tragen. Beispiel: 


10 PRINT „A-DATEI:“ : PRINT 
20 INPUT ‚„DATEINAME, SLOT, DRIVE, VOLUME: “; DA$, SA, DA, VA 
30 PRINT ‚„B-DATEI:“ : PRINT 
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40 INPUT „DATEINAME, SLOT, DRIVE, VOLUME: “; DB$, SB, DB, VB 
s0 PRINT CHR$(4) „OPEN“'DAS „„S“SA „„D“DA „‚V“VA 

60 READ CHR$(4) „READ“DAS 

70 PRINT CHR$(4) „OPEN“DB$ „,s“SB „„‚D“DB „‚V“VB 

80 READ CHR$(4) „READ‘‘DB$ 


Ein im meinen Augen lästiger Fehler des DOS-Betriebssystems ist der, daß die 
READ- und WRITE-Befehle im Gegensatz zum OPEN-Befehl keine Parameter zu- 
lassen. Deshalb ist es ohne Poke-Befehle nicht möglich, auf mehrere, sich in ver- 
schiedenen Drives und/oder Slots befindliche Dateien gleichzeitig zuzugreifen, ohne 
die jeweilige Datei vorher zu schließen. 


Da Apple-Besitzer in der Regel nur über 2 Laufwerke verfügen, stellt sich das Pro- 
blem des Slot-Wechsels selten, und Volume-Nummern werden ohnehin kaum be- 
nutzt. Dagegen ist die Notwendigkeit des Drive-Wechsels offenkundig. Angenom- 
men, man wollte zwei in sich sortierte Textfiles, die so groß sind, daß sie nicht kom- 
plett in den RAM-Speicher passen, von Drive 1 nach Drive 2 mischen (= Merge- 
oder Mischvorgang = Vereinigung zweier in sich sortierter Teildateien zu einer neu- 
en ebenfalls in sich sortierten großen Gesamtdatei). Zu diesem Zweck müssen vor- 
übergehend alle drei Dateien offen sein. 


Drive-Wechsel: 


Mit POKE -21912,1 kann man Drive 1 als aktives Drive deklarieren. 
Mit POKE -21912,2 kann man Drive 2 als aktives Drive deklarieren. 


Slot-Wechsel: 
Mit POKE -21910,4 kann man Slot 4 als aktiven Slot deklarieren. 
Mit POKE -21910,6 kann man Slot 6 als aktiven Slot deklarieren, usw. 


Diese Pokes gelten für 48K-DOS, also nicht für den Fall, daß sich DOS in der Lan- 
guage Card befindet. 


2.6.7.1. ‚„Schein-Mischen‘ (Demo-Programm) 


100 PRINT CHR$(4) „OPEN Al, DI“ 
110 PRINT CHR$(4) „WRITE Al“ 
120 FORX = 1 TO 1000 
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PRINT „AAAAAAAAAAAAAAA“ : NEXT 
PRINT CHR$(4) „CLOSE“ 

PRINT CHRS$(4) „OPEN A2“ 

PRINT CHR$(4) „WRITE A2“ 

FOR X = 1 TO 1000 

PRINT „AAAAAAAAAAAAAAA“ : NEXT 

PRINT CHR$(4) „CLOSE“ 

REM SCHEIN-MERGEN 

DIM AIS (100), A2$ (100) 

PRINT CHR$(4) „OPEN A1“ 

PRINT CHR$(4) „OPEN A2“ 

POKE -21912,2 : REM DRIVE 2 

PRINT CHR$(4) „OPEN M“ 

FOR X = 1 TO 10 

POKE -21912,1 : REM DRIVE 1 

PRINT CHR$(4) „READ A1“ 

FOR Y = 1 TO 10 : INPUT A1$(X) : NEXT 

PRINT CHR$(4) „READ A2“ 

FOR Y = 1 TO 100 : INPUT A2$(X) : NEXT 

POKE -21912,2 : PRINT CHR$(4) „WRITE M“: REM DRIVE 2 
FOR Y = 1 TO 100 : PRINT AIS(X) : PRINT A2$(X) : NEXT 
NEXT X 

PRINT CHR$(4) „CLOSE‘' 


Ohne die angegebenen Poke-Befehle wäre es bei den geöffneten Dateien Al, A und 
M nicht möglich gewesen, den Drive-Wechsel aus dem Programm heraus vorzuneh- 


men. 


2.6.7.2. „Echtes Mischen‘‘ (Registerprogramm) 


Das nachfolgende komplizierte Programm ist ein Teil-Modul zu meinem Register- 
programm, das vor allem für Register am Ende von Büchern (Stichwort + Seiten- 
zahl) Verwendung findet. Die Dateistruktur ist folgende: 


nn BD 


. Feld: Anzahl der Stringpaare (als 6stelliger String) 
. Feld: CHR$(34) + 1. Stichwort 

. Feld: CHR$(34) + 1. Seitenzahl 

. Feld: CHR$(34) + 2. Stichwort 

. Feld: CHR$(34) + 2. Seitenzahl 
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usw. bis zu den 2 letzten Feldern, die ‚„„ULI‘, „ULI‘ als programmtechnische End- 
marker haben. 


Beispiel: 


000004 
„Computer 
„l0 

„DOS 3.3 
„30 
„Apple Ile 
„20 
„formatieren 
20 

„ULI 
»UEI 


Es sind also sowohl die Stichwörter als auch die Seitenzahlen als Strings gespeichert, 
da das Programmpaket auch für andere Register, z.B. Glossare, verwendet werden 
kann. Es werden automatisch bis zu 20 in sich bereits sortierte, beliebig große Datei- 
en paarweise von Drive 1 eingelesen, gemischt und als neue Misch-Datei auf Drive 2 
abgespeichert. Das paarweise Mischen muß solange vollzogen werden, bis nur noch 
eine einzige „‚Monster‘‘-Enddatei übrigbleibt, die übrigens mehr als 300.000 Zeichen 
Umfang haben kann. Da das Mischen ein langwieriger Prozeß ist, ist das Applesoft- 
Programm mit dem TASC compiliert (mit Origin $0806). Außerdem wird Diversi- 
DOS benutzt, das in die Language Card geschoben wird. Aber auch dies reicht noch 
nicht aus, da Sortieren und Mischen nach DUDEN erfolgen soll, dessen Alphabeti- 
sierungsrichtlinien sich bekanntlich nicht mit der ASCII-Code-Reihenfolge decken. 
Deshalb erfolgt die Umcodierung durch ein Assemblerprogramm, das die Strings 
auch nicht mehr mit dem INPUT-Befehl, sondern mit dem Monitor-GETLN-Befehi 
($FD6A) einliest, umcodiert und dann in der ‚‚Schein-String-Zeile‘‘ 150 ablegt, so 
daß das compilierte Applesoft-Programm diesen String übernehmen kann. Auf diese 
Weise — Diversi-DOS, DOS in der LC, Compilterung, Assemblerroutinen — ist das 
Registermischprogramm etwa 10-20 mal schneller, als ein entsprechendes 
„normales‘‘ Applesoft-Programm unter DOS 3.3 wäre. Was allein 10mal schneller 
bedeutet, wird einem klar, wenn man statt 1 Minute z.B. 10 Minuten am Bildschirm 
wartet. 


Wenn DOS oder Diversi-DOS in der Language Card liegt, ist das Umschalten von 
Drive 1 nach Drive 2 bei geöffneten Textfiles besonders kompliziert und kann wegen 
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des erforderlichen ‚‚Bank-Selecting‘‘ nur durch ein kleines Assemblerprogramm rea- 
lisiert werden. Das Umschalten geschieht in dem nachstehenden Programm durch 
die Befehle CALL 826 (= Drive 1) und CALL 830 (= Drive 2). Ferner kommt in 
dem Programm CALL 849, das das Sortierwort unmodifiziert mit GETLN einliest, 
sowie CALL 875 vor, das die Umcodierung vornimmt. 


100 
110 
120 


REM = = = REGISTERMISCHER = = = 
REM !INTEGER* 
REM !DEFCOMMONA,D 


REM !DEFCOMMONDS$(20),DS 
GOTO 190 
MS = „MS = LEFTS („m 


Ma “ MM): RETURN 
CALL 849:MM = PEEK (255): GOSUB 150:M0$ = M$ 

CALL 875:MM = PEEK (255): GOSUB 150:C0$ = M$ 

INPUT NO$: RETURN 

POKE 846,10: POKE 847,24: REM $180A:?--- 

ONERR GOTO 220 

GOTO 280 

PRINT CHR$ (4): PRINT CHRS$ (4),,CLOSE“: IF PEEK (222) = 9 THEN 
PRINT CHRS$ (4),,DELETE“A0$ 

TEXT : HOME : PRINT „FEHLER-NR. “ PEEK (222) 

PRINT CHRS$ (7) 

PRINT „W = WEITER “; 

GET D$: IF D$ < > „W“‘ THEN 260 

REM MENUE 

HOME : INVERSE : PRINT „ REGISTERMISCHER “: NORMAL 
PRINT : PRINT „(MAX.10 SORTIERTE DATEIPAARE MISCHBAR)“ 
PRINT : PRINT „(AUSGANGSDATEIEN,DI —> ZIELDATEIEN,D2)“ 
PRINT : PRINT „I MISCHEN VON DATEIPAAREN“: PRINT : PRINT 
„5 UEBERTRAGEN EINER RESTDATEI“: PRINT : PRINT „0 
HAUPTMENUE“: PRINT 

INVERSE : PRINT „VON ULRICH STIEHL — VERSION V. 01.02.84“ 
NORMAL : PRINT 

GET D$: ON D$ = „l‘“ GOTO 350: ON D$ = „5“ GOTO 940: ON D$ = 
„0“ GOTO 540: GOTO 330 

REM DATEIENEINGABE 

CLEAR : DIM D$(20) 

HOME : PRINT : PRINT CHR$ (4),,CATALOG,DI“: INVERSE : 
PRINT „RETURN ALLEIN = EINGABEENDE“: NORMAL 
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370 
380 
3% 
400 
410 
420 
430 
440 
450 
460 


470 


480 
4% 
500 
510 
520 
530 


660 





D=0 
D = D + 1: INPUT „A-DATEI:‘;D$(D) 
D = D + 1: INPUT „B-DATEI:';D$(D) 


IF D$(D — 1) = „“ AND D$(D) = „“ AND D = 2 THEN 280 
IF DS(D — 1) = „“ AND D&D) = „“ THEND = D — 2: GOTO 40 
IF DS(D — 1) = „“ OR D&D) = „“ THEN 360 


IFD< 19 THEN 380 
PRINT „RICHTIG Y/N “; 

GET D$: ON D$ = „N“ GOTO 350: IF D$ < > „J“ GOTO 450 
GOSUB 530: PRINT : FOR X = 1 TO D: PRINT CHR$ 

(4), UNLOCK‘ DI), DI“: NEXT 

HOME : PRINT : PRINT CHR$ (4),,CATALOG,D2“: INPUT „ZIEL- 


DATEINAME:“;D$: ON D$ = „“‘ GOTO 470: PRINT „RICHTIG Y/N 
GET X$: ON X$ = „N“ GOTO 470: IFX$ < > „J“ GOTO 480 

REM MISCHSTART 

A = — 1: HOME 


A=A+%IFA + 1< = DTHEN 5% 
HOME : PRINT „MISCHEN FERTIG !“: GOTO 240 

HOME : HTAB 14: VTAB 10: INVERSE : PRINT „BITTE WARTEN“: 
NORMAL : RETURN 

HOME : INVERSE : PRINT „PROGRAMMDISKETTE IN DRIVE I“ 
NORMAL : PRINT CHRS$ (7): INPUT „HAUPTMENUE EINLESEN 
JA/N ““:D$: IF D$ < > „JA“ THEN 280 

GOSUB 530: PRINT : PRINT CHR$ (4),,BRUN 
REGISTERSTARTER.OBJ,DI1“ 

REM = == MISCHEN = == 

CLEAR :L = 150: DIM T$(150),1$(150) 

GOSUB 530: HTAB 1: VTAB I: PRINT D$(A): PRINT D$(A + 1) 
REM ERSTER STRING 

A1$ = D$(A):A2$ = DA + 1) 

AOß = D$ + „.M“ + STR$((A + 1/2) 

PRINT : PRINT CHR$ (4),,OPEN“A1$, „DI“: PRINT CHR$ 
(4),,READ“AI$: INPUT X$:X = VAL (X$) 

PRINT CHR$ (4), OPEN“A2$: PRINT CHR$ (4),,READ“‘A2$: INPUT 
Y$:Y = VAL (Y9) 

CALL 830: REM LAUFWERK 2 

PRINT CHR$ (4), OPEN“A0$: PRINT CHRS$ (4),,WRITE“A0$:X = X 
+ Y:X$ = STR$(X):Y$ = „,000000°:X$ = LEFT$ (Y8,6 — LEN (X$)) + 
x$: PRINT XS 

CALL 826: REM LAUFWERK | 
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670 PRINT CHRS$ (4),,READ“A1$: GOSUB 160:M1$ = M0$:C1$ = C0$:N13 
= N0$ 

680 PRINT CHR$ (4),,READ“'A2$: GOSUB 160:M2$ = M0$:C2$ = C0$:N2$ 
= N0$ 

6% B=|1 

700 IF C1$ > C2$ GOTO 780 

HI REMSSeesche - (denen 

720 T$(B) = M1$:1%(B) = NI$ 

730 B=B + 1:IFB> LTHEN GOSUB %0 

740 PRINT CHR$ (4),,READ“A1$: GOSUB 160:M1$ = M0$:C1$ = C0$:N1$ 
= N0$ 

750 IFMI$ = „ULI“ ANDNIS = ‚„ULI“ THEN PRINT CHR$ 
(4),, CLOSEAI1HA$ = A2$:T$(B) = M2$:IS(B) = N2$: GOTO 840 

760  GOTO 700 

20 IBREMSSSCHh> Ce se 

780 TS(B) = M2$:1$(B) = N2$ 

7% B=B+ 1:IFB> LTHEN GOSUB %0 

800 PRINT CHR$ (4),,READ“‘A2$: GOSUB 160:M2$ = M0$:C2$ = C0$:N2$ 
= N0$ 

810 IFM2$ = „ULI“ ANDN2$ = „ULI“ THEN PRINT CHR$ 
(4),,CLOSEA2S:A$ = A1$:THB) = M1$:1$(B) = N1$: GOTO 8409 

820 GOTO 700 

830 REM AS=RESTDATEI 

840 B=B + 1:IFB> LTHEN GOSUB %00 

850 PRINT CHRS$ (4), ,READ“A$: INPUT T$(B): INPUT IS(B) 

860 IF TB) < > „ULI“ AND I$s(B) < > „ULI““ GOTO 840 

870 L = B: GOSUB 900 

880 PRINT CHR$ (4),,CLOSE‘““: PRINT CHR$ (4),,DELETE“A1$,,,D1“: 
PRINT CHR$ (4),,DELETE‘‘A2$: GOTO 510 

890 REM SPEICHERN EINES L-BLOCKS 

9%0 CALL 830 

910 PRINT CHRS$S (4),,WRITE“A0$: FORX = 1 TOLL: PRINT CHR$ 
(34); T$CX): PRINT CHR$ (34); 1$(X): NEXT 

920 FORX = IT TOL:-TKX) = „“:I$CX) = „“: NEXT : CALL 826:B = 1: 
RETURN 

930 REM ÜBERTRAGEN 

940 CLEAR ::L = 150: DIM T$(150),1$(150): HOME : INVERSE : PRINT 


950 


„UEBERTRAGEN EINER DATEI “: PRINT ‚VON DRIVE I NACH 
DRIVE 2°“: NORMAL 
PRINT : PRINT „I = ZURUECK‘: PRINT : PRINT ‚O0 = UEBER- 
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TRAGEN“: PRINT 
GET D$: ON D$ = „1“ GOTO 280: IF D$ < > ‚0‘ GOTO 960 
HOME : PRINT : PRINT CHRS$ (4),,CATALOG,DI“: INPUT „ALTER 
DATEINAME: ‘;X$: ON X$ = „“ GOTO 940: PRINT 

„RICHTIG YN ©; 

GET Y$: ON Y$ = „N“ GOTO 970: IF Y$ < > „J“‘ GOTO 980 
HOME : PRINT : PRINT CHR$ (4),,CATALOG,D2“: INPUT „NEUER 
DATEINAME: ‘;;A0$: ON A0$ = X$ GOTO 940: PRINT 

„RICHTIG JUN ‘“; 

GET Y$: ON Y$ = „N“ GOTO 990: IF Y$ < > „J“‘ GOTO 100 
GOSUB 530: PRINT : PRINT CHRS$ (4),,OPEN“XS, ‚DI: PRINT CHRS 
(4) „READ°X$: INPUT Y$:B = VAL (Y$) 

PRINT CHR$ (4),,\ OPEN“ A0$,,,D2“: PRINT CHR$ (4),, DELETE“ A0$: 
PRINT CHR$ (4),,\ OPEN“ AO$: PRINT CHR$ (4),,WRITE“A0$: 

PRINT Y$ 

IFB>LTHEN 1110 

REM B<=L;B+1= „ULI“ 

CALL 826 

PRINT CHRS$ (4),,READ“XS: FORX = 1 TOB + 1: INPUT TS(X): 
INPUT IS(X): NEXT 

CALL 830 

PRINT CHR$ (4),,WRITE“AO$: FORX = 1TOB + 1: PRINT CHRS 
(34); T$(X): PRINT CHR$ (34); 1809): NEXT : PRINT CHR$ (4),,CLOSE“ 
PRINT CHR$ (4),,DELETE“X$, ,‚DI“: GOTO 280 

REM B>L;D=REST 

A=INTB/D:D=B+tI-A-L 

FORZ = 1TOA 

CALL 826 

PRINT CHR$ (4),,READ“X$: FOR X = 1 TO L: INPUT T$@X): INPUT 
180%): NEXT 

CALL 830 

PRINT CHR$ (4),,WRITE“AO$: FORX = 1 TO L: PRINT CHRS 

(34); T$(X): PRINT CHRS (34); 1$(X): NEXT 

NEXTZ 

CALL 826 

PRINT CHRS$ (4),,‚READ“X$: FOR X = 1 TO D: INPUT T$(X): INPUT 
1800: NEXT 

CALL 830 

PRINT CHRS$ (4),,WRITE“A0$: FOR X = 1 TO D: PRINT CHRS$ 

(34); T$(X): PRINT CHRS (34); 18%): NEXT 
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1220 PRINT CHR$ (4),,CLOSE‘“: PRINT CHR$ (4),,DELETE‘X$,,,D1“: 





GOTO 280 
ı ASM 
1 DRG 826 
= * 
Bf KEERREIEHITKH RT HT HR IT IER RR 
4 + 
S HCOBE EOU FEOBEB 
& HEOS1 EAU ECo8l 
7 HEOSE EC #+008% 
mi HEAR&GB ERÜU  FEASE 
7 HEIOGBE Elhl FC082 
10 * 
ii * 
4 KEREKREERFERRERH RHEIN ER IRH H 
1: * 
Sams AT Oi 14 DRIVYEI 1.DA #E51 ıB26 
Gaabı Do 5Z 15 EINE DRIVE 
GESEı AF7 O2 16 DRIVER LDA #E0% ‚ghl 
G5404 AE 3 CO 17 DRIVE LDX HEOSE 
o:42: Ab 8: Go 18 LDX HE.GBE 
oh4ös: BD 48 EA 17 STa HEAGB 
2249: AD 82 CO Zu DA 2 HEO8SE 
0340: 60 4 RTS 
== * 
EN ERKHHRFETTR IH HH IH EEE ER IR 
24 ” 
25 "STRLEN EOL) 2 ı#FF 
ie - FUFFER EGU FZOl ıNACH " 
a7 SETLN EQLU #FD6öA 
28 * 
54D: SD FF FF 29 FORER STA #FFFF,KX 8467847 
o350: 60 Bi ATS 
E 2 
* DARF KEIN NULLSTRING SEIN, 
* D.H. NUR RETURN! 
# 
3351: 20 dA FD 35 GETLNI JSR  GETILN 549% 
334% = 00 36 LDX #0 
wndass ED 01 O2 a7 MOVESTRI LDA FUFFER,X 
are 27 TFF 8 AND #F7/rF 
a35B: 9D 01 023% STAa FUFFER,X 
O3SE: 07 OD 40 CHF #FOD ; RETURN 
Oase: Fo 06 41 EEQÜ 2 MOVEEXIT 
Aids: Zu AD DE 42 JSER FOHRER 
Onöcss EB ei INX 
oR66dı DO EE 44 ENE MOVESTRI 
hößd: go FF 45 MOVEEXIT STX STRLEN 
Olsßı 60 46 ARTS 
47 * 


48 EKFEKKHERKTR HT HT HH HH HH RT FH RE 
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oz&R: 
GE6D: 


r36r: 
G3721 


0374: 


o576: 
0378: 
G37/A&8 
037C: 
OS7E: 
0380: 
038925 
0384: 


03886: 
o:BB4 
GBA: 
0 We 10H 
GEBE 
CEAFC 


DEF: 
7:74: 
9 Bi 7 F 
0378: 
EF7A: 
DAFT: 


GRTFE: 
DEAD: 
GERZ: 
GaAdı 
BIETET 


GRAB: 
GBAfi: 
RAU: 
OEREs 
WEBO: 
OEBZ: 
GEB44 
G3E6: 
DEEB: 
GEBET: 


ÜNBE: 
OBBE: 
OSRF: 
DSCC 
IR IE IE. 


02043 


* 
GETLNE 


* 
MOVESTRE 


* 
ESZETT 


UEUCHST 


DBUCHST 


ABUCHST 


GREUCHST 


* 
MÜVESTRE 


NICHTS 


EXITi 


LDX 
LDY 


LDA 
CHF 
BED 


CMF 
BEE 
CHF 
BEO 
EMF 
EEO 
cMr 
EEO 


EMRF 
BEL 
EMP 
BEN 
CMF' 
BER 


CMF 
BUS 
EMF 
BCS 
EMF 
BUS 


EMF 
EEG 
SMF 
BECO 
BES 


1.Da 
ENE 
L.DA 
BNE 
DA 
EBENE 
LDA 
ENE 
SEC 
SEC 


J5rR 
INX 
INT 
ENE 
EPX 
ENE 


#0 
#0 


FUFFER,Y 
#FÜD 
EXITI 


#F7E 
ESZETT 
##7D 
UBUCHST 
#F7C 
ORUCHST 
#F7B 
ABUCHST 


#F5D 
UBUCHST 
#FrIc 
ORBUCHST 
#FIB 
ABUCHST 


#Foi 
GRERBUCHST 
HEISE 
NICHTS 
HFAL 
MOVESTRE 


#0 
NICHTS 
#2 
MOVESTRS 
NICHTS 


#5 
MOVESTRZ 
#u 
MOVESTRZ 
#0 
MOVESTRE 
in 
MOVESTRZ 


#20 
FÜHRER 
MOVESTREZ 


#0) 
EXITZ 


875 


; RETURN 


: LENGTH 
; PUFFENT 


54 2. DOS für Applesoft-Programmierer 





O3Cö: AFP FF 103 LDA 0 #'/' ; LEER 
DEcd: 20 4D 03 104 JSRK  FÜOKER 

GOCH: E8 105 INX 

DELC: 86 FF 10& EXITE 5STX STRLEN 

OSCEs 50 147 RTS 


Näheres über die GETLN-Routine steht im Teil II, Kapitel 4. Insbesondere beachte 
man, daß GETLN im Gegensatz zu INPUT das Anführungszeichen mit einliest. 


2.6.8. Sequentielle und Random-Files 


Sequentielle File sind Textfiles mit variablen Feldlängen und indirektem Zugriff, 
Random-Files sind Textfiles mit konstanten Feldlängen und direkten Zugriff. (Ran- 
dom bzw. genauer Random Access bedeutet wahlfreier = direkter Zugriff auf den 
Diskettensektor.) 


Die bisher behandelten Beispiele waren — auch wenn dies nicht ausdrücklich er- 
wähnt wurde — sogenannte sequentielle Textfiles. Ein typischer sequenticller Text- 
file wie z.B. bei dem oben beschriebenen Registerprogramm setzt sich aus einer belie- 
bigen Anzahl unterschiedlich — die Betonung liegt auf unterschiedlich! — langer 
Felder zusammen, die wie eine Sequenz (= Folge) aneinandergereiht und lediglich 
durch Returns getrennt sind. DOS hängt an das Ende eines Textfiles automatisch ein 
Ciri-O als sozusagen DOS-internen Endmarker. Ein sequentielle Dateien verarbeiten- 
des Applesoft-Programm sollte darüber hinaus eigene ‚„‚Buchführung‘‘ machen, da- 
mit die „END OF FILE“-Fehlermeldung vermieden wird. Bei dem obigen Register- 
programm gibt es 


l. als ersten String der Datei einen Anfangsmarker als normierte, 6stellige, 
rechtsbündig ausgeschlossene Zahl, die die Anzahl der Doppelstrings (Stich- 
wort + Seitenzahl) beinhaltet, sowie 


2.  alsletzte2 Strings der Datei zwei Endmarker (,ULI“, „ULI‘‘), damit man nie- 
mals beim Ctrl-O ankomm 


Warum eine normierte östellige Zahl als String, mag man sich fragen. Da sequentielle 
Dateien Felder mit unterschiedlicher Länge haben und Zahlen selbst eine unter- 
schiedliche Anzahl von Speicherstellen auf der Diskette einnehmen können (1, 10, 
100, 1000 usw.), wäre es bei einer sequentiellen Datei nachträglich nicht mehr mög- 
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lich, den Anfangsmarker korrekt durch einen neuen Zahlenwert (z.B. bei gemischten 
Dateien) zu überschreiben. 


Sequentielle Dateien sind Textfiles mit indirektem Zugriff analog zu Dateien, die auf 
Datenkassetten, Lochstreifen usw. gespeichert sind. Wenn man z.B. das 150. und 
nur dieses 150. Feld einer sequentiellen Datei einlesen möchte, so bleibt einem nichts 
anderes übrig, als alle vorangehenden 149 Felder mit einzulesen, da DOS keine Mög- 
lichkeit hat, auf sozusagen rechnerischem Wege zu ermitteln, auf welchem Sektor 
und auf welcher Spur sich exakt das 150. Feld befindet. Man könnte zwar auch hier- 
für eine ‚Buchhaltung‘ einführen, doch würde diese ihrerseits besonders bei kurzen 
Feldern relativ viel Platz auf der Diskette beanspruchen, von dem Zeitaufwand für 
die Anlage einer solchen „Buchführung‘‘ ganz zu schweigen. Aber selbst wenn all 
dies kein Hindernis wäre, dann wäre diese ‚‚Buchführung‘* trotzdem ein (für Disket- 
tenlaufwerke) nutzloses Unterfangen, denn nachträglich läßt sich bei einem sequen- 
tiellen File kein Feld mehr erweitern oder kürzen, ohne daß die Datei insgesamt neu 
abgespeichert wird. Dies ist zwar bei Festplattenlaufwerken mit hoher Zugriffszeit, 
nicht jedoch bei normalen Diskettenlaufwerken mit vergleichsweise sehr geringer Zu- 
griffszeit, akzeptabel. 


Der sroße Vorteil sequentieller Dateien beruht auf der Kompaktheit der Datenspei- 
cherung, da gewissernmaßen jede Speicherstelle auf der Diskette voll ausgenutzt 
wird. Hinsichtlich des Verwendungszwecks eignen sich sequentielle Files für solche 
Dateien, bei denen man nicht auf das EINZELNE Feld zugreifen muß, sondern wo 
die GESAMTHEIT der Felder im Vordergrund steht. Ein typisches Beispiel für se- 
quentielle Dateiverwaltung ist damit ein Registerprogramm, weil hier die Stichwörter 
wahllos (z.B. nach dem Buchumbruch) eingegeben werden und die fertig sortierte 
Enddatei mit der Übertragung in die Photosetzmaschine ihren Zweck erfüllt hat. 


Wenn dagegen Datensätze, z.B. Kundenadressen usw., ständig gepflegt werden müs- 
sen (durch Neueingabe, Änderung und Löschung), sollte man anstelle sequentieller 
Dateien Random-Files anlegen. Random-Dateien sind Dateien mit direktem Zugriff, 
da die Records oder Datensätze eine vordefinierte Länge haben. Nehmen wir an, ei- 
ne Random-Datei bestehe aus 501 Records — numeriert von 0-500 — mit je 128 Zei- 
chen Länge, dann ist es für DOS ein leichtes auszurechnen, auf welchem Sektor und 
auf welcher Spur sich z.B. der 150. Record befindet. Da ein Sektor 256 Bytes um- 
faßt, passen in diesem Fall 2 Records auf einen Datensektor. Im 1. Datensektor be- 
finden sich die Records O und 1, im 2. Datensektor die Records 2 und 3 usw. Somit 
befindet sich der 150. Record in der ersten Hälfte des 75. Datensektors. 


Random-Files werden geöffnet mit einer Längenabgabe (L = Recordlänge) als zu- 
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sätzlicher Parameter zum OPEN-Befehl. Ferner muß bei jedem READ- oder 
WRITE-Befehl die Record-Nummer (R) spezifiziert werden. Beispiel: 


10 PRINT CHR$(4) „OPEN TELEFONLISTE,LS0“ 
OR=1 

30 PRINT CHR$(4) 

40 INPUT „NAME + TEL. “; T$ 

50 PRINT CHR$(4) „WRITE TELEFONLISTE,R“R 
60 PRINTX$:R = R + 1: GOTO 30 


Die Record-Nummern R beginnen immer bei 0 und gehen maximal bis 32767. Die 
Record-Länge L muß im Bereich 1-32767 liegen. Normalerweise benutzt man den 
Record 0 nicht für eigentliche Daten, sondern z.B. für die Speicherung der Zahl der 
bisher belegten Records. Ein einzelner Record besteht meist aus mehreren Feldern, 
z.B. Vorname, Zuname, Straße usw. In diesem Sinne ist Record das Fremdwort für 
Datensatz. Speicher- und programmtechnisch lassen sich 2 Typen von Datensätzen 
unterscheiden: 


Typ 1: Felder durch Returns abgegrenzt (Auszug) 


10 PRINT CHR$(4) „OPEN ADRESSEN,L132“ : REM 128 + 4 RETURNS 
20 R=1 

30 PRINT CHR$(4) 

40 INPUT „VORNAME: “; V$ 

50 INPUT ‚„ZUNAME: “; Z$ 

60 INPUT ‚STRASSE: “; S$ 

70 INPUT „PLZ und ORT: ‘“; P$ 

80 F = LEN (V$) + LEN (Z$) + LEN (S$) + LEN (P$) 

% IFF> 128 THEN PRINT „RECORD ZU GROSS“ : GOTO 30 
100 PRINT CHRS$(4) „WRITE ADRESSEN,R“R 
110 PRINT V$: PRINT Z$ : PRINT S$: PRINTP$:R = R + 1:GOTO 30 


Das Einlesen würde beim Typ 1 so aussehen (Auszug): 


500 PRINT CHR$(4) „READ ADRESSEN,R“R 

510 INPUT V$ : INPUT Z$ : INPUT S$ : INPUT P$ 
520 PRINT CHR$(4) 

530 PRINT V$ : PRINT Z$ : PRINT S$ : PRINT P$ 
540 RETURN 
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Typ 2: Record durch Return abgegrenzt (Auszug) 


10 
20 
30 
40 


170 
180 


PRINT CHR$(4) „OPEN ADRESSEN,L129° : REM 128 + 1 RETURN 
R=1 

PRINT CHR$(4) 

INPUT „VORNAME: “; V$: V = LEN (VS) : IF V > 32 GOTO 40 
INPUT „ZUNAME: “; Z$:Z = LEN (Z$) : IF Z > 32 GOTO 50 
INPUT „STRASSE: ‘5 S$:S = LEN (S$): IFS > 32 GOTO 60 
INPUT „PLZ und ORT: “; P$: P = LEN (P$) : IF P > 32 GOTO 70 
PRINT CHR$(4) „WRITE ADRESSEN,R“R 

F = V:: PRINT V$; : GOSUB 140 

F = Z: PRINT Z$; : GOSUB 140 

F = S: PRINT S$; : GOSUB 140 

F = P: PRINT P$; : GOSUB 140 

PRINT:R = R + 1: GOTO 30 

D = 32 - F:IFD = 0 THEN 180 

FORX = 1TOD 

PRINT CHR$@2); : REM LEERTASTE 

NEXT X 

RETURN 


Das Einlesen würde beim Typ 2 so aussehen (Auszug): 


500 
510 
520 
530 
540 
550 
560 


PRINT CHRS(4) „READ ADRESSEN,R“R 
INPUT A$ : PRINT CHR$(4) 

PRINT LEFT$ (A$, 32) 

PRINT MID$ (A$, 33, 32) 

PRINT MID$ (AS, 65, 32) 

PRINT RIGHTS (A$, 32) 

RETURN 


Beim Typ 1 ist jedes einzelne Feld durch ein Return vom nachfolgenden abgegrenzt, 
während beim Typ 2 lediglich das letzte Feld des Records, also der Record selbst, ein 
Return erhält. Der Typ 1 ist trotz der zusätzlichen Returns speicherökonomischer, da 
keine unnötigen Leertasten am Feldende verschwendet werden. Für Bildschirmmas- 
ken sind derartig variable Feldlängen jedoch ungeeignet. Ferner kann bei solchen 
Feldern kein formatierter, tabellarischer Ausdruck mehr zustande kommen, denn 
wie will man eine mehrspaltige Tabelle einrichten, wenn z.B. die Straße mal 35 Zei- 
chen und mal 15 lang ist. Hinzu kommt, daß die Datentypistin sozusagen erst am 
Schluß weiß, ob sie kürzen muß oder nicht, da ja die tatsächliche Recordlänge erst 
mit der Eingabe des letzten Feldes vorliegt. 
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Der nachfolgende kleine Random-Test zeigt, daß Random-Files natürlich nicht nur 
„at random‘‘, d.h. zufällig oder wahlfrei, sondern auch sequentiell gelesen werden 
können. Allerdings ist jeweils der R-Parameter erforderlich. 


100 REM === RANDOM-TEST == = 
110 PRINT CHR$ (4), OPENRANDOM,L200° 
120 FORX = 1 TO 20 

130 PRINT CHR$ (4),,WRITERANDOM;R“X 
140 PRINT X - 1.2345 

150 NEXTX 

160 PRINT CHR$ (4),,CLOSE“ 

170 INPUT ,„,(1-200)?°°; A 

180 A = A- 1.2345 

190 PRINT CHR$ (4),,OPENRANDOM,L200“ 
200 FORX = 1 TO 20 

210 PRINT CHR$ (4), READRANDOM;,R'X 
220 INPUT B 

230 IFA = B THEN PRINT A,B: GOTO 270 
240 NEXTX 

250 PRINT CHRS (4),,CLOSE“ 

260 END 

270 PRINT „ENDE“ 

280 PRINT CHR$ (4),,CLOSE‘' 


2.6.8.1 Vorformatierte Random-Files 


Es gibt jedoch auch die Möglichkeit, Random-Files anzulegen, die zugleich sequen- 
tielle Dateien sind. Bei dem obigen Random-Test wird jeweils nur eine einzige Zahl 
in einem 200stelligen Record abgelegt. In Erweiterung unserer Erläuterungen zur 
Struktur von Textfiles gilt für Random-Files, daß nicht nur nach dem allerletzten Re- 
cord, sondern auch zwischen den einzelnen Records NUL-Codes (Ctrl-0) abgespei- 
chert sein können. Zur Verdeutlichung folgendes Extrembeispiel: 


10 PRINT CHR$(4) „OPEN TEST‘ 

20 PRINT CHR$(4) „DELETE TEST“ 

30 PRINT CHR$(4) „OPEN TEST,L‘100 
40 PRINT CHR$(4) „WRITE TEST,R““1000 
50 PRINT „1“ 

60 PRINT CHR$(4) „CLOSE“ 
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Dieses Programm würde einen Random-File erzeugen, der (später) fast die ganze 
Diskette einnehmen würde, obgleich zunächst nur eine einzige ‚1‘ abgespeichert 
wäre. Wäre die Datendiskette zuvor initialisiert worden, dann hätte die TEST-Datei 
folgende Struktur: 


100 mal 1000 (0-999) Ctrl-0’s + „1“ + Return + 98 Cirl-0's 


Hätte es sich dagegen um eine alte Diskette gehandelt, auf der zahlreiche Files bereits 
gelöscht worden wären, dann würde die TEST-Datei anstelle „‚sauberer‘‘ Ctrl-O’s 
„wirren Schrott‘‘ in Form von Resten alter Programme usw. enthalten. 


Besser ist es, wenn man Random-Dateien quasi vorformatiert in dem Sinne, daß 
man die ganze Datei z.B. mit Leertasten, Nullen o.ä. beschreibt mit der Folge, daß 
solch eine Random-Datei dann auch wie eine sequentielle Datei behandelt werden 
kann, weil das Ctrl-O dann nur noch am Ende der Datei vorkommt. Gegenstück zum 
obigen Extrembeispiel: 


10 PRINT CHR$(4) „OPEN TEST“ : PRINT CHR$(4) „WRITE TEST“ 
20 FORX = 0 TO 1000 

30 FOR Y = 1 TO 9: PRINT CHR$(2); : NEXT Y : PRINT 

40 NEXTX 

50 PRINT CHR$(4) „CLOSE“ 


Ein weiterer Grund spricht für die ‚Vorformatierung‘‘ von Random-Files. Nicht- 
vorformatierte und sozusagen ‚‚at random‘ beschriebene Files sind auf der Diskette 
nicht in homogener Reihenfolge (in auf- oder absteigenden Spuren) abgespeichert 
mit der Folge, daß die Zugriffsgeschwindigkeit entsprechend sinkt. Hinzu kommt, 
daß DOS bei Random-Files nur eine „‚unintelligente Buchführung‘‘ macht, die sogar 
die Anlage von Randon-Files und/oder Random-Records zuläßt, die später nie mehr 
vollständig beschrieben werden können! Ein Beispiel: 


100 L= 256 - 4 
110 E = 40 

120 PRINT CHR$(4) „OPEN TEST,L“L 
130 FORR = 0 TOE 

140 PRINT CHR$(4) „WRITE TEST,R“R 
150 PRINTR + 1000 

160 NEXTR 

170 PRINT CHR$(4) „CLOSE“ 
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(Die nachfolgenden Überlegungen setzen Kenntnisse aus dem Teil II dieses Buches 
voraus, so daß der Leser ggf. diesen Absatz überspringen möge.) 


Bei diesem Programm beträgt die Feldlänge 4 Sektoren oder 256 mal 4 = 1024 Bytes 
= 1 Kilobyte. Es werden 401 (0-400) Records mit jeweils einer 4stelligen Zahl (1000- 
1400) + Return beschrieben. Die Datei wird in Zeile 170 „‚ordnungsmäßig‘‘ ohne 
jegliche Fehlermeldung geschlossen. Ist jedoch wirklich alles in Ordnung? Gewiß 
nicht! Denn eine normale DOS 3.3-Diskette mit 140 Kilobytes Bruttospeicherkapazi- 
tät kann natürlich nicht 401 Kilobytes an Daten umfassen. Was ist passiert? Da mit 
Zeile 150 nur ein — inklusive Return — 5 Bytes langes Feld auf die Diskette geschrie- 
ben wurde, hat DOS für jeden Record nur 1 Sektor belegt, jedoch bereits 3 weitere 
Sektoren vorgemerkt. Dieses Vormerken geschieht dadurch, daß in der TSL für je 3 
reservierte Sektoren Nullen eingetragen werden. Die erste TSL für die ersten 122 
Daten-Sektoren sowie der erste eigentliche Daten-Sektor seien nachstehend auszugs- 
weise gelistet: 


Track $13, Sektor $0F: Erster TSL-Sektor 


00 35 FF ©% %©% © 00 00 T.$15, S. $OF nächste TSL 

0 ©%® 00 % 3 0E T2 32 T. 313, S. $0E erster Daten-Sektor 
383 Tr 4 3 OD T 32 T.$12,S. $0D zweiter Daten-Sektor 
73.33. TA 54 B DE Rn 32 uw 

383 4 3 ®BTRO SD 

T3 53 T 4 23 0A 0 00 So sıeht die TSL tatsächlich aus. 

0 8% 0% ©% 232 9% 0 00 

0 08% 08 % 23 0 00 00 usw. 


Track $13, Sektor $0E: Erster Daten-Sektor 


Bl BöÖO BO BO SD 0% 00 1000 + Return 
0 0 0 0 0% © 0 0 USW. 


Der erste Daten-Sektor ist aus der ersten TSL in der zweiten Zeile des Hex-Dumps 
durch 13 OE (= Track $13, Sektor $0E) erkenntlich. Danach stehen auf der Disketie 
6 Nullen, die hier als T2 S2, T3 S3, T4 S4 kenntlich gemacht wurden. Gemeint ist da- 
mit, daß mit den Nullen die zweiten/dritten/vierten Daten-Tracks/Sektoren vorläu- 
fig in der TSL reserviert, jedoch noch nicht in der VTOC als belegt markiert wurden. 
Der Random-File benötigt damit zunächst nur 401 reine Daten-Sektoren sowie zu- 


2. DOS für Applesoft-Programmierer 61 











sätzlich mehrere TSL-Sektoren, die jedoch insgesamt auf die Datendiskette passen. 
Wollte man nun jedoch die 401 bereits angelegten Records vollständig beschreiben, 
d.h. jeweils bis zum 1024. Byte, dann würde bereits nach weniger als 100 Records die 
Fehlermeldung „DISK FULL“ angezeigt. 


Aus dem Beispiel kann man lernen, daß die Anlage dynamischer Random-Files, bei 
denen die Inhalte der Records und/oder die Anzahl der Records selbst kontinuierlich 
wächst, unter DOS nicht empfehlenswert ist. 


2.6.9. APPEND, POSITION, BYTE 


Diese DOS-Befehle werden selten benutzt, zumal insbesondere APPEND und PO- 
SITION zeitintensiv sind, d.h. unter Umständen beim normalen DOS 3.3 mehrere 
Minuten dauern können. 


APPEND bewirkt das Anhängen (to append) eines speicherinternen Arrays an einen 
speicherexternen Textfile. Die Syntax ist APPEND — WRITE — PRINT. Ein vor- 
angehendes OPEN ist überflüssig. Man beachte, daß APPEND definitionsgemäß 
nur für WRITE-Operationen gedacht. Beispiel: 


10 PRINT CHR$(@4) „OPEN TEST“ 

20 PRINT CHR$(4) „WRITE TEST“ 

30 FORX = 0 TO 9: PRINTX : NEXT 

40 PRINT CHR$(4) „CLOSE“ 

50 REM JETZT FOLGT APPEND-BEFEHL 
60 PRINT CHR$(4) „APPEND TEST“ 

70 PRINT CHR$(4) „WRITE TEST“ 

80 FOR X = 100 TO 199 : PRINT X : NEXT 
% PRINT CHR$(4) „CLOSE“ 


Die Felder eines Textfiles werden vom DOS bei bestimmten Befehlen wie numeriert 
behandelt, wobei die Numerierung mit Null beginnt (0, 1, 2, 3...). Symbolisch läßt 
sich dies so darstellen: 


FO...rFl...rF2...rF3...rF4...rF5...rFn...Ctrl-O 
>Z- 
aPp2 
rPO 
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d.h. Feld 0, gefolgt von Return, Feld 1, gefolgt von Return usw. bis zum Feld n, ge- 
folgt von Return. Ein Feld besteht in der Regel aus 1...n Zeichen + Return, doch 
wird als Grenzfall vom DOS auch das nackte Return ohne vorangehende Zeichen als 
Feld aufgefaßt. Wenn ein File gerade geöffnet wurde, ist der Positionszeiger auf Feld 
0 gerichtet. Nach dem ersten PRINT oder INPUT richtet sich der Zeiger auf Feld ] 
usw. Jedes eingelesene oder gespeicherte Return erhöht also den Positionszeiger. 
Beim APPEND wird (bei DOS 3.3) der File solange eingelesen, bis kein Return mehr 
folgt, also der Endmarker Ctrl-0 erreicht wurde. Dann wird ab dieser Stelle der Ar- 
ray gespeichert. Bei diesem Verfahren ist es nicht verwunderlich, daß der APPEND- 
Befehl so lange dauert. (Diversi-DOS ist hier etwas „‚schlauer‘‘, da es gleich aufgrund 
der TSL zum letzten Datensektor geht, wodurch der APPEND-Befehl dann nur 
einen Bruchteil der Zeit in Anspruch nimmt.) 


Man muß unterscheiden zwischen der relativen und der absoluten Feldposition. 
Wenn der Positionszeiger auf Feld 0 gerichtet ist, fallen absolute und relative Feldpo- 
sition zusammen. Wenn der Zeiger (Z) jedoch z.B. nach 2 INPUTs von Feld O und I 
auf Feld 2 gerichtet wird, befindet man sich aus der Sicht von Feld 0 in der (absolu- 
ten) Position 2 (aP2) und aus der Sicht von Feld 2 in der relativen Position 0 (rP0); 
siehe obiges Schaubild. 


Der R-Parameter bei Random-Files bezieht sich auf die absolute Position eines Re- 
cords, der sich aus einem ODER mehreren, durch Returns getrennten Feldern zu- 
sammensetzen kann. Bei sequentiellen Files ist der R-Parameter ebenfalls möglich, 
doch bezieht er sich nunmehr auf die relative Feldposition, d.h. auf dasjenige Feld, 
daß dem r-ten Return vorausgeht. Nur direkt nach dem OPEN-Befehl ist die relative 
mit der absoluten Feldposition identisch. Beispiel: 


10 PRINT CHR$(4) „OPEN TEST“ : REM ZEIGER DANACH AUF FO 
20 PRINT CHR$(@4) „WRITE TEST“ 
30 PRINT 0 : REM ZEIGER DANACH AUF FI 
PRINT 1 : REM ZEIGER DANACH AUF F2 
50 PRINT 2: REM ZEIGER DANACH AUF F3 
PRINT 3 : REM ZEIGER DANACH AUF FA 
70 PRINT 4: REM ZEIGER DANACH AUF F5 
80 PRINT CHR$(4) „„CLOSE“ 
90 REM JETZT FOLGT EIGENTLICHER TEST 
100 PRINT CHR$(4) „OPEN TEST“ : REM ZEIGER DANACH AUF FO 
110 PRINT CHR$(4) „POSITION TEST,R1“ : REM RELATIV = ABSOLUT! 
120 PRINT CHR$(4) „READ TEST“ 
130 INPUTR : PRINTR: REM FELD 1, WEILO + 1 = I! 
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140 
150 
160 
170 


RO ist das momentane Feld, R1 das nächste, R2 das übernächste usw. Aus der Sicht 
von z.B. dem absoluten Feld Fi ist R4 das (l + 4 = ) 5. Feld. Nach OPEN- 
POSITION-WRITE bzw. OPEN-POSITION-READ silt: absolut gleich relativ. 
Später nach POSITION-WRITE bzw. POSITION-READ gilt: absolut ungleich re- 


PRINT CHRS$(4) „POSITION TEST,R4“ : REM RELATIV! 
PRINT CHR$(4) „READ TEST“ 

INPUTR: PRINTR : REM FELD5, WEIL1 +4 =5! 
PRINT CHR$(4) „CLOSE“ 


lativ. Das nachfolgende Demo-Programm faßt die neuen Befehle zusammen: 


100 
105 
110 
120 
130 
140 
150 
160 
165 
170 
180 
1% 
200 
210 
220 
230 
240 
245 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 


REM === APPEND-POSITION-TEST = = = 
REM --- MERGE.FILE DRIVE I — 

PRINT CHR$ (4) „OPEN MERGE.FILE,DI1“ 
PRINT CHR$ (4) „DELETE MERGE.FILE“ 
PRINT CHR$ (4) „OPEN MERGE.FILE“ 
PRINT CHR$ (4) „WRITE MERGE.FILE“ 


Z 


0 : PRINT „,00000° : REM FORMATIERTER FELDZÄHLER 


PRINT CHR$ (4) „CLOSE MERGE.FILE“ 

REM --- EINZELFILE.I DRIVE 2 --- 

PRINT CHR$ (4) „OPEN EINZELFILE.1,D2“ 
PRINT CHR$ (4) „DELETE EINZELFILE.1“ 

PRINT CHR$ (4) „OPEN EINZELFILE.I“ 

PRINT CHRS$ (4) „WRITE EINZELFILE.1“ 

FOR X = 0 TO 50 

PRINT STR$ (X) + „ AAAAAAAAAAAAAAAAAAAA 
NEXT X 

PRINT CHR$ (4) „CLOSE EINZELFILE.1“ 

REM --- EINZELFILE.2 DRIVE 2 --- 

PRINT CHR$ (4) „OPEN EINZELFILE.2,D2“ 
PRINT CHR$ (4) „DELETE EINZELFILE.2“ 
PRINT CHR$ (4) „OPEN EINZELFILE.2“ 

PRINT CHRS$ (4) „WRITE EINZELFILE.2“ 

FOR X = 0 TO 50 

PRINT STR$ (X) + „ BBBBBBBBBBBBBBBBBBBB“ 





NEXT X 

PRINT CHR$ (4) „CLOSE EINZELFILE.2“ 

HOME 

PRINT „EINGABE M = RÜCKKEHR ZU MENÜ“ : POKE 34, 2 
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HOME :B$ = „1 = EINZELFILE.I = 2 = EINZELFILE.2 “ 
PRINT „I ABSOLUTE POSITION“ 

PRINT „2 RELATIVE POSITION“ 

PRINT „3 APPEND“ 

PRINT : INPUT „,;K$ 

HOME: ON VAL (K$) GOTO 420, 550, 670 : GOTO 360 
REM ----- ABSOLUT --- 

INPUT „WELCHE ABSOLUTE POSITION “;A$ 

IF A$ = „M“ GOTO 360 

PRINT B$;: INPUT ‚,;Y$ 

IF Y$ = „1“ THEN Y$ = „EINZELFILE.1‘“: GOTO 470 
Y$ = „EINZELFILE-2“ 

A = VAL (A$) 

PRINT CHR$ (4) „OPEN“ Y$ „‚D2“ : ZEIGER AUF NULL 
PRINT CHRS$ (4) „POSITION“ Y$ „‚R"A 

PRINT CHR$ (4) „READ“ Y$ 

INPUT X$ 

PRINT CHRS$ (4) „CLOSE“ Y$ 

PRINT X$ 

GOTO 420 

REM ----- RELATIV ----- 

INPUT „WELCHE RELATIVE POSITION? “:A$ 

IF A$ = „M“ GOTO 360 

A = VAL (A$) 

PRINT BS$;: INPUT ‚,‘;Y$ 

IF Y$ = „1“ THEN Y$ = „EINZELFILE.1°: GOTO 610 
Y$ = „EINZELFILE-2“ 

PRINT CHR$ (4) „POSITION“ Y$ „‚R“A : ZEIGER RELATIV! 
PRINT CHRS$ (4) „READ“ Y$ 

INPUT X$ 

PRINT CHR$ (4) 

PRINT X$ 

GOTO 550 

REM ----- APPEND ---.- 

PRINT CHR$ (4) „APPEND MERGE.FILE,DI“ 

PRINT CHR$ (4) „WRITE MERGE.FILE“ 

PRINT X$ 

PRINT CHR$ (4) „CLOSE MERGE.FILE“ 

PRINT CHRS$ (4) „OPEN MERGE.FILE,DI“ 

PRINT CHR$ (4) „WRITE MERGE.FILE“ 
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730 Z = Z + 1: PRINT LEFT$ ( „00000“, 5 — LEN (STR$(Z)));Z 
740 PRINT CHR$ (4) „CLOSE MERGE.FILE“ 

750 PRINT CHR$ (4) „CATALOG,D2“ : REM ERSETZT POKE -21912, 2 
760 GOTO 360 


Verfolgt man den obigen Programmfluß, so stellt man fest, dal die Zeile 610 auch 
dann durchlaufen werden kann, wenn einer der beiden Einzelfiles durch Zeile 480 
nicht zuvor geöffnet wurde, d.h. der POSITION-Befehl ist auch ohne vorangehen- 
den OPEN-Befehl zulässig, setzt jedoch dann den Zeiger auf Null, als ob OPEN vor- 


angegangen wäre. 


Der BYTE-Befehl spezifiziert bei sequentiellen Dateien die absolute bytemäßige Stel- 
le in einem File. Nehmen wir an, ein Brief umfasse 2.001 Zeichen (0-2000). Dann 
würde das Programm 


10 PRINT CHR$(4) „OPEN BRIEF“ 

20 PRINT CHR$(4) „READ BRIEF, B1000“ 

30 FOR X = 1000 TO 2000 

40 GET X$ : PRINT CHR$(4); : PRINT X$; NEXT X 
50 PRINT : PRINT CHR$(@) „CLOSE“ 


die zweite Hälfte des Briefes einlesen und am Bildschirm anzeigen. Im Gegensatz zu 
dem R-Parameter beim POSITION-Befehl, der sich immer nur auf NACHFOL- 
GENDE Felder richten kann, kann der B-Parameter bei sequentiellen Textfiles ähn- 
lich wie der R-Parameter bei Random-Files „‚vorwärts und rückwärts‘‘ angewandt 
werden, d.h. mit dem BYTE-Befehl könnte man z.B. eine Datei rückwärts einlesen 
(was natürlich nicht besonders sinnvoll wäre): 


10 PRINT CHR$(4) „OPEN ALPHABET“ 
20 PRINT CHR$(4) „WRITE ALPHABET“ 
30 FOR X = 65 TO 91 : PRINT CHRS(X); : NEXT : REM A BIS Z 
40 PRINT : PRINT CHR$(@4) „CLOSE“ 
50 PRINT CHR$(4) „OPEN ALPHABET“ 
FOR X = 25 TO 0: REM Z BIS A 
70 PRINT CHR$(4) „READ ALPHABET,B“,X 
80 GET X$ : PRINT CHR$(4);: PRINT X$ : NEXT X 
90 PRINT CHR$(4);: PRINT : PRINT CHRS$(4) „CLOSE“ 


Man beachte, daß man bei beiden Programmen wegen des GET-Befehls, der das Re- 
turn unterdrückt, eine permanente CHR$(4)-DOS-Umschaltung vornehmen muß. 
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Da der BYTE-Befehl nicht nach Feldern, sondern nach absoluten Diskettenspeicher- 
stellen vorgeht und insofern Returns wie jedes andere Zeichen behandelt, ist die An- 
wendung dieses Befehls normalerweise nur bei Dateien mit exakt bekannter Struktur 
sinnvoll. 


Abschließend sei erwähnt, daß der POSITION- bzw. BYTE-Befehl R- bzw. B- 
Parameter im Bereich 0-32767 zuläßt. 


2.6.10. EXEC (Executive Textfile) 


EXEC ist die Abkürzung für execution (Befehlsausführung) bzw. executive textfile 
(Befehlsdatei). Darunter ist ein sequentieller Textfile zu verstehen, der aus Direktbe- 
fehlen besteht, die man normalerweise manuell über die Tastatur eingeben würde, 
die jedoch durch Starten des Execfiles automatisch ausgeführt werden. Execfiles er- 
stellt man am besten mit einem Textverarbeitungsprogramm, das Textfiles erzeugt, 
beispielsweise mit dem Applewriter Ile, oder ersatzweise mit einem Applesoft- 
Programm. Da bei aktiven Execfiles Tastatureingaben verboten sind — diese wür- 
den nämlich als Execbefehle interpretiert — und ferner nicht jeder DOS- oder 
Applesoft-Befehl Bestandteil eines Execfiles sein darf, ist die Nutzanwendung dieses 
File-Typs auf wenige Spezialfälle begrenzt. Vereinfachtes Beispiel: 


10 PRINT CHR$(4) „OPEN EXECUTIVE“ 
20 PRINT CHR$(4) „WRITE EXECUTIVE“ 
30 PRINT „RUN PROGRAMM 1“ 

40 PRINT „RUN PROGRAMM 2“ 

50 PRINT CHR$(4) „CLOSE“ 


Danach würde der manuell über die Tastatur eingegebene Befehl 
EXEC EXECUTIVE 


zunächst das Programm 1 und — nach Beendigung desselben — automatisch das 
Programm 2 starten. 


2.6.10.1. Bload-Finder 


Dieser Execfile, der z.B. mit dem Applewriter auf einer Diskette unter dem Namen 
BLOADFIND gespeichert sein mag, bewirkt durch den Befehl EXEC BLOAD- 
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FIND die Ermittlung der Startadresse und Länge eines zuvor geBLOADeten Binärs- 
files in dezimal und hexadezimal. Die diversen Pokes dienen der Hexadezimalum- 
rechnung. Das ‚,?‘“ steht für PRINT. 


POKE 47097, PEEK (43634) + PEEK (43616) — INT ( ( PEEK (43634) + PEEK 
(43616))/256) 256: POKE 47098, PEEK (43635) + PEEK (43617) + ((PEEK 
(43634) + PEEK (43616) ) > 255) 

HOME : ?,,BLOAD-FINDER — LETZTER BLOAD:“ 

9, „DEZ.“ ?,,ANF: ‘% PEEK (43634) + 256 : PEEK (43635): ?,,LEN: “; PEEK 
(43616) + 256 - PEEK (43617): ?,,END: ““; PEEK (47097) + 256 - PEEK 
(47098) 

2,,HEX.“: ?,,ANF: $“;: POKE 70, PEEK (43634): POKE 71, PEEK (43635): PO- 
KE 58, 64: POKE 59, 249: CALL 65209: ?: ?,,LEN: $°;: POKE 70, PEEK (43616): 
POKE 71, PEEK (43617): CALL 65209: ?: ?,,END: $“;: POKE 70, PEEK (47097): 
POKE 71, PEEK (47098): CALL 65209 

2: ?,, NAME EINFÜGEN“: 7: ?,, BSAVE......... ‚A; PEEK (43634) + 256 
PEEK (43635); „„L‘; PEEK (43616) + 256 - PEEK (43617): HTAB 1: VTAB 17 


2.6.10.2. List-Maker 


Dieser Execfile — zu starten mit z.B. EXEC LIST.MAKER — speichert das sich ge- 
rade im RAM befindliche Applesoft-Programm unter dem Namen LIST auf der 
Diskette als Textfile (!), der z.B. dann mit dem Applewriter bearbeitet und später 
wieder mit EXEC LIST in ein normales (binäres) Applesoft-Programm zurückver- 
wandelt werden kann. Die Pokes dienen u.a. der Tastatureingabe, da der GET- 
Befehl nicht möglich wäre. 


POKE 768, 44: POKE 769, 16: POKE 770, 192: POKE 771, 173: POKE 772, 0:PO- 
KE 773, 192: POKE 774, 16: POKE 775, 251: POKE 776, 44: POKE 777, 16: POKE 
778, 192: POKE 779, % 

63999 POKE 51, 128: POKE 33, 33: ?: ?CHR$(4) „OPENLIST“: ?CHR$(4) „DE- 
LETELIST“: ?CHRS$(4) „OPENLIST“: ?CHR$(4) „WRITELIST“: LIST — 
63998: ?CHR$(4) „CLOSELIST“: TEXT: RETURN 

HOME: INVERSE: ?,,LIST.MAKER'“: NORMAL: ?: ?,,INSERT DATA DISK 
AND PRESS RETURN“: CALL 768: GOSUB 63999: DEL 63999, 63999 


69 





TEIL 0: DOS für Assembler- 
Programmierer 


In diesem Teil II werden technische Details der Datenspeicherung, diverse Tips und 
Tricks (auch für Applesoft-Programmierer) sowie insbesondere der Direktzugriff 
auf einzelne Diskettensektoren auf Maschinenebene behandelt. Da die Assermbler- 
programmierung nicht jedermanns Sache ist, enthält dieser Teil eine Vielzahl aus- 
führlich kommentierter Komplettprogramme als Quell-Code, so daß der Leser die 
Programme oder Programmteile problemlos in seine eigenen Programme integrieren 
kann. Als Assembler wurde der „Big Mac“ bzw, ‚‚Merlin‘‘ verwendet. Auf seltene 
Pseudo-Opcodes und Macros wurde bewußt in den Assemblerprogrammen verzich- 
tet, damit eine Abänderung des jeweiligen Source-Codes für andere Assembler (z.B. 
LISA, S-C-Assembler usw.) sich problemlos gestaltet. 
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6.2.10. File-Reader 


100 REM *** FILE-READER *#* 

110 PRINT CHR$ (21): IF PEEK (368644) = 76 AND FEERK (36885) = 
26 AND FEEK (36866) = 144 THEN 140 

120 PRINT z FRINT CHR#' (4)"MAXFILES 3": CLEAR : HIMEM: 4095 

130 FRINT = FRINT CHR# (4) "BLOAD FILE-READER.DRI" 

140 TEXT : HOME z INVERSE : PRINT "* FILE-READER *#": FRINT "* 
U.STIEHL/8F *": NORMAL : PRINT : FRINT "START J/N "5; 

150 BET X#: ON X# = "J" G60TD 160: ON X# < > "N" GOTD 150: 
FRINT : END 

160 HOME »: INVERSE : PRINT "DISKETTE EINLEGEN": NORMAL = FRINT 
: FRINT "W = WEITER "; 


1790 BET X: IE X# «< _> "W" THEN 170 

180 HOME =: FRINT » FRINT CHRE (4) "CATALOG": INFUT "DATEIS";%8#: 
IF X£ = "" GOTO 140 

170 HOME + INVERSE : FRINT "ESC=ENDE #* SPACE=STOPF": NORMAL : 


PRINT 
200  FRINT CHR# (4) "UNLOCK"XF 
210 PR# O0: IN# O0: CALL 365884: REM #9000 
220 CALL i0072: FRINT : FRINT "i=ERNEUT * Ö=ENDE "; 


230 GET X$: ON X# = "1" GOTO 140: IF X# < > "0" THEN 250 
: AS 
1 ORG Faset :#7000 
= ” 
2900: 46 iA F0 73 JMP  INITIAL 
# = 
er $=====su m I LE-READER ses 
& % 
7 INDI EQU #CE ı#CF 
[=] INDEZ E@U #FE s#rFF 
7 TEXT EQU &£FBEF 
10 HOME E2dU  EFEHS 
BEE PRINT EOU E£FDED 
2 HEXOUT EQU +FDDA 
15 * 
14 * MAX. 5 TSL = 5#122#2=12720=$404 
15 IOTALTSL ERU #5BO0 ı-E8FC4 
18 # 
17 *MACROPUFFER = 122 5SEKTOREN 
id * 
1% MACFUFF EAU 1000 ı-FBA0O 
ZU E 
=1 * MAXFILES MUSS 3 SEIN 
zz * 
PER? TSLFUFF E@U 9700 ı ANFANG 
= TSLFTR EAU #9701 ;‚FOÜINTER 
29 TSL Eau &77%C ıEIG.TSI. 
2 RWTS EQU $3DF 


27 RWTSLOCO EQU FIEI 
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003: 
Foods 
09T: 
Pb: 
307: 
go08B%4 
FO0F: 
FDA: 
GaoB: 
7600: 
GOOD: 
GODE«4 
Foör: 
9010: 
@oiie 
70125 
So13: 


Fo143 
9017: 


FO18: 
9019: 


F01A: 
F901D: 
FO1F: 
7021: 
9025: 
9025: 
9O2B: 
FO29: 
FOZB: 
FOPrE: 


9031: 
9053: 
7035: 
9037: 
05%: 
FOSB: 
FO3E: 
FO: 
043: 


O1 


EF 


05 


70 


70 


Zee) 


Fu 


70 
70 


DOSWARM 
* 

= 

# 

IOE 
SLOT 
DRIVE 
VOLUME 
TRACK 
SECTOR 
DETLODW 
DETHIGH 
BUFLOW 


BUFHIGH 


COMMAND 
DOSERROR 
EFFVOL 
VORSLOT 
VORDRIVE 
# 

* 

* 

DCT 


* 
YSAVER 
KSAVER 
* 


* ACTIVE 
# 


INITIAL 


SR 


187 
Eau  $#3DO 
IOB-SLÜCHK 
HEX 01 ı IMMER 
HEX 80 
HEX o1 
HEX oa 
HEX 00 
HEX 00 
DFE #<£DET 
DFB #>DET 
HEX 0 
HEX DOG 
HEX @0 : UNUSED 
HEX 00 : COUNTEO 
HEX © ı kREAD 
HEX 00 
HEX 00 
HEX #0 
HEX #1 
BET 
HEX GOÖ1EFDB : IMMER 
HExX 00 
HEX OO 
SLOT + DRIVE ERMITTELN 
JSR RWTSLOCO 
sTY InDi :LOWIOB 
sTA INDi+i ;:HIGHIDOB 
LDY #1 
LDA IND1),Y 
STA SLOT 
INY 
LDA «INDI),.Y 
STA DRIVE 
BIT $C610 


* TOTAL-TSL INITIALISIEREN 


* 


LDA 
sTA 
LDA 
SsTA 
LDA 
sta 
LDA 
SsTA 
JMr 


#< TOTALTSL. 
IND1i 
#>TOTALTSL, 
INDi+1 
#<TSLFUFF 
EUFL.OW 
#>TSLFUFF 
BUFHIGH 


SSTOREI ;ERSTE 
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9046: AD 01 97 81 NEXTTSL. LDA TSLFTR 


9043: FO 29 82 BEG 7 SSTORE4A ıLETZTE 
9046: BD 07 95 83 STAA TRACK 
SOAE: Ab O2 97 84 DA X TSLFTR+1 
7051: SD O8 70 35 sTA SECTOR 
054: Ar Fü 34 LDA #=IDR 
79564 AO 03 87 L.DY #2.1[0B 
058: ZU DE 03 88 JSR 2 RWTS 
P05EB: Bo 1A 87 ECS ERRORI 
SıS5D: AZ 00 9 SSTGREi LDX ##+00 
S0OSF: AU 00 1 LDY #300 
20&13: BD O6 97 972 SSTORE2 LDA TSL.X 
os. 91 LE 7.5 STA &CINDI).Y 
S0ssı E& CE 74 ING IND 
9098: DR 0% 95 ENE SSTORET 
Yoarı E& CF 2) INE INDiI+i 
Sat: E85 54 SSTOREF INK 
SodaDd: EO Fi 78 EFX #244 :122#2 
Gi5krFz DOG FG 77 EBENE SSTOREZ MAX. 
eH7i4 4 46 Fa 100 JMF NEXTTSL 
7074: 46 ES 90 101 SSTORE4  JMF BATEHO 
102 8 
105  #* LESEFEHLER 
104 * 

. 774 zo 2F FB 105 ERRUÜR1 JSR TEXT 
7A: 20 5a FE 105 JSR HOME 
V7D: Ab 10 20 1097 .DA4  DOSERROIR 
Go80s 26 DA FD 108 JSR HEXOUT 
7085: 4C DO 03 109 JMPF DOSWARM 

LE # 

111 * LOESCHEN F1H00-=#8AFF 

112 * 
086: AF 00. 11T CLEARO DA 2 #<£MAGCFUFF 
9088: 85 FE 114 STA INDZ 
oA: AI 10 115 LDA #3MACFUFF 
P08Cı»+85 FF 11& STA INDSE+H1 
IOBE: AF 00 117 LDA #0 
7070: 88 118 TAY 

"2091: 971 FE 119 ELEAR1 STA (IND2) ,Y 
707m. C8 120 INY 
7094: DO FB 121 BNE CLEARI 
9096: E&6 FF 122 INC INDZ+1 
9098: As FF 123 LDX INDE+1 
Su9A: EO SR 174 EFX #>TOTALTSL 
299768: DO PS 125 ENE CLEARI 
FOIE: 0 128. : ARTS 

127 %* 
128 * PRINT 122 SEKTOREN 
129 * 
SO9F+ AF 00 130  FRINTO LDA #0 
güoAlr 85 FE 131 STA INDZ 
F0AS: A7 10 132 LDA #>MACFUFF 
FOAS: BIS FF 133 STA InDe+i 
F79A7: AD 00 134 LDY #0 


g9ORAF: Bil FE 135 FRINTI LDA «IND2) ,Y 
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FOAB: 097 80 
FoOAD: C9 8D 
GOAF: FO 07 
goBl: C37 Au 
90R2: Bü 03 
90BS: 38, 
Y0B&: EF 80 
9GBS: ZU ED FD 
F0BB: AD 00 LO 
g9OBE: 19 13 
F9C0: 2C 10 Co 
FOC5H: C9 9B 
9068: FO IB 
F5C7: CR Ab 
569: DO 08 
FUCK: AD 00 Co 
FOCE: 10 FB 
95D0: IC in Co 
20D3: CB 

GoD4: DO DE 
90DA: E& FF 
750D8: AS FF 
FODA: CD oc 99 
HDD: 90 CA 
FODF: FÜ CB 
GOEI: 80 

SOEZ: 58 

FOET: &8B 

YOE4: 80 


GOES: Ab 00 
F0E7: BC 18 FO 
FOER: AF 00 
SOEC: 
GOEE: A? BB 
9oFOr: 85 CF 


?OF2: AC 19 70 
90F5: Bi CE 
F0F7: DO 05 
FOF7: AF 00 
GOFB: 
F9OFD: &H0 


FOFE: AZ 00 
9100: 8D 197 90 
7103: 
9105: 8D OB 90 
9108: AP 10 


136 
137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
1850 
161 
162 
163 
164 
165 
166 
167 
168 
169 
170 
171 
172 
173 
174 
175 
17& 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 


190 


FRINTZ 


WAIT 


FRINTS 


FRINTA 


* 


FRINTZ 
#FAO 
FRINTZ 


#80 
FRINT 
C900 
FRINTS3 
$COIO 
##9B 
PRINT4 
#EAO 
PRINT3 
CL000 
WAIT 
$c010 


;NO KEY 
;sESC 


; SPACE 


PRINTI 
IND2+1 
IND2+1 
EUFHIGH 
FRINTI 
FRINT1 
;RETURN 


;ENDE 


* 122 SEKTDREN BATCH LESEN 


* 
BATCHO [DY 
STY 
LDA 
STA 
LDA 
STA 
# 


#0 

YSAVER 

#< TOTALTSL 
InDI 
#>TOTALTSL 
INDI+1° 


+ AUSSERER LOOPF 


+ 
BATCHI 


* 

* READ A 
* 

BATCH2 LDX 
sTA 
LDA 
STA 
LDA 


VSAVER | 
(INDL),Y 
BATCH2 
#0 

+48 :P-REG 
;ENDE 


BATCH 


#0 

XSAVER 
#<MACFUFF 
BUFLOW 
#>MACFUFF 
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F910A: BD 
710D: CE 
1103 20 


9113: AC 
g91iä: Bil 
9118: FÜ 
911A: EE 
P11D: BD 
FI20: ‚EE 
9123: AC 
Fl2a: DO 
7128: E6ö 
F717A: Bi 
?12C: 8D 
GLEFY 87 
9131: Ad 
2133: 20 


136: 90 


9138: EA 
71373 "ER 
9136: AC 
F913F: DO 
7141: Ed 
27143: AE 
7144: EB 
2147: E8 
7148: 9E 
214B: Eoö 
F714D: 70 
Fi4F: A? 
9151: 85 
193: 20 
7156: 40 


—-End assembly-- 


345 bytes 


Errors: Ö 


70 
0 
FU 


70 


79 
70 
72 
70 


To 


70 
70 


171 
192 
173 
174 
175 
176 
197 
178 
477 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
zı1 
212 


213 
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STA BUFHTGH 
DEC BUFHIGH 
JSR X GLEARO 

= 

* INNERER LDOP 

* 

BATCHS LDY YSAVER 
LDA CINDI?,Y 
BEQ BATCH? 
INC BUFHIGH 
STA TRACK 
INC YSAVER 
LDY YSAVER 
EBENE BATCH4 
INC INDi+i 

BATCH4 LDA &IND1)}.Y 
STA SECTOR 


LDA #>I08B 

LDY #<IOR 

JSR RWTS 

BCE 2 BATCHS 

NOF sERRORI 


EATCHS INC YSAVER 
LDY YSAVER 
ENE BATCH& 
ING INDi+1 
EATCHS LDX KXSAVER 


INX 

INX 

STX ASAVER 
EFX #244 


BCC 2 BATCHS3 
BATCH7 LDA #0 
STA #48 ı F-REG 
JSR FRINTO 
JMP BATCHI 
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6.2.11. FASTBRUN-Routine (Apple II Plus Emulator für Ile) 


: ASM 
1 ORG #0D04 
2 * 
3 * FFEASIC FÜR ÄFFLE IIE 
E East anna mann 
ba * 
& * FFBASIC WIRD IN DIE AFFLE IIE 
7 * LO-EARTE GELADEN. SO DASS DER 
B * AFFLESOFT-INTERFRETER MODIFI- 
3 * ZIERT WERDEN KANN. 
10 * 
11 * Dieses Frogramm ist ein HBei- 
12 * spiel für die Anwendung der 
13 * FASTBRUN-Routine, 
14 * Wie wird’s gemacht” 
ei * 
16 * 1. Dieses Driver-Programm 
3,7 * nach $0D04 BLDADen 
18 * 2. FFBASIC von System-Master 
17 * nach #Z1000 ELDADen 
20H * 34 BSAVE FF.NEU,AFODO4,L$52FB 
21 * 4. Mit ‘Bag of Tricks’ oder 
22 # einer anderen RWTS-Utility 
23 * die ersten 4 Bytes des 
4 #: ersten Sektors FF.NEU 
25 * von O4DOFBE2 
2 * in G04DOFO00 ändern, 
27 * so daß der ERUN-Befehl nur 
28 Re nach den ersten Sektor 
29 * eimliest und der Rest von 
30 En der Fastbrun-Routine besorgt 
RS; * wird. (FF.NEU = 52 Sektoren) 
SE 3 
53 - 
=4 *+ FASTERUN-ROUTINE 
3a g zzammSmSaRzsuhssecee 
35 * 
37 * Diese Routine setzt MAXFILES 5 
58 * und DOS 3.3 in den unteren 48# 
37 + voraus! 
40 # 
oDn4: 42 ID OB 41 JMF PARAMS 
42 INDi EQU S&CE ı$CE-CF 
43 INDZ EQBU #FE :$FE-FF 
44 TSL EOU $970C »MXFLS 3 
45 RWTS EGU #3D7 
45 #INFUT-OUTFUT-CONTROL-BLÜCKRF##3* 
oDO?: 01 47 IOB HEX ©i STETS 
ODO8B: &0 48 SLOT HEX #0 SLOT & 
ODO9: Ol 47 DRIVE BER {3% 


DODOA: GO SO VOLUME HEX 00 
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ODOB: 00 S1 TRACK HEX 00 
ODOCH OO ah SECTOR HEX 00 
oöbDoOD: 183 3 DETLOW DFE #<DCT 
ODOE: OD o4 DETHIEH DFE #5DCT 
ODöF: 00 kart? BUFLOW HEX 00 
oD10: 00 56 BUFHIGH HEX 00 ;’STtEIS 8 
oDil: O0 57 HEX 00 » UNUSED 
oD12+: 00 58 HEX Go ; COUNT: © 
OD1IF3: Ol 3% COMMAND HEX 01 ıREAD 
oD14: 00 [= 8) DOSERROR HEX 00 
0D19: O0 &i EFFVOL HEX 00 
oD16: &0 6 VORSLOT HEX &0 
oDi17: O1 63 VORDRIVE HEX 01 
64 #*DEV ITCE-CHARACTERISTICS-TABLE##* 
oD183 oo oil EF #5 DET HEX GODlEFDS ;STETS 
oD1B: Da 
6D1C: O0 [2Y2} TEMP HEX 00 
&7 * 
&8 #* SLOT/DRIVE/VOLUME 
67 * 
8DIb: 20 EEE 85 39 FARAMS JSR Z3E3 :IOR WO? 
oDzo: 84 CE 71 S5TY IND 
8022: 85: EF 7zZ STA INDi+i 
oD24: AQ O1 7,65 LDY #1 
0D26: Bi CE 74 LDA {IND1),Y ; I0B 
OD28: BD 08 Ob 75 STA SLOT 
OD2E: SD 16 ÜOD 76 STA VORSLOT 
ODZE: C8 Wer INY 
OD2r2 Bi. CE 78 LbA (IND1),.Y 
oDS31: 8D 09 OD 797 STA DRIVE 
0oD34: 8D 17 OD 80 STA VORDRIVE 
0D37s CO 81 INY 
onDSs8: Bi CE 82 LDA +4INDi),Y 
SDSRA: BSD 15 OD 853 stk EFFVOL 
24 + 
aD3D: AFP OD BI LDA #2:0D :BEOO-LPF 
86 # 
87 * Diese RWTS setzt das Einlesen 
38 * mit dem 2. Sektor fort. 
87 * 
oD>F=s BB 10 aD 90 STA BUFHIGH 
onD42: AF O0 91 LDA ##009 
oD44: SD OF mD 72 STAA BUFLOW 
0D47: Ad O2 73 LDY #2 
DAY: 8C IC OD 94 STY TEMP 2. SEKT. 
35 * 
GDAGH EE 1310 OD Y& RERADERI ING BUFHISH 
nDAFs Acc I0 SD 77 LDY TEMP 
ODSZz: BY DOG 97 98 LDA TSEHN 
DSG: FO 28 9 BEE READEND 
oDS7: ED OR OD 100 STA TRACK 
oDSA: CE ıim1 INY 
DBSB: BF 0OC 97 102 EDA Tal. 
ODSEr 8D GC on 105 sTA SECTOR 
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oDAl: EE IC OD 104 INC TEMP 
0064: EE 1C 0D 105 INC TEMF 
OD&A7+ AF OD 10% LDA #»108 
DDEI: Au 07 107 LDY #<IOR 
ODE: 20 DI 05 108 JSR  RUTS 
OD6E: BO 05 167 BES ERROR 
D©D70: 4C 4C OD 140 JMP OO READERI 
W735 AP 00 iil ERROR LDA #0 
OD7E5: 95 48 112 STA 348 
OD77ı AF CS +13 LDA #'E" 
OD79,; SD oO 04 114 aTa #400 
OD7E: 40 175 RTS 
RD7Dı: AFP on 11& READBEND LDPA #0 
OD7F; 85 48 117 STA #485 ıF-REG 
119 °* 
1179 * Ende der Fastbrun-Routine 
au 
TEL 8 
ODBsl: AC Du DE 122 JMF 4 &0EU0 
r23 & 
124 * AUF VOLLE PAGE AUFFÜLLEN! 
Ta :* 
BA: EA EA EA 126 HEX EAEAEAEAEA 
2D87: EA EA 
0D89: EA ER EA 127 HEX EAEAEAEAEA 
oDaC: EA EA 
ODBE: EA EA EA 128 HEX EAEAEAEAEA 
oD91: EA EA 
DIE: EA EA EA 129 HEX EAEAEAEAEA 
OD?&: EA EA 
OB9B: EA EA EA i30 HEX EAEAEAEAEA 
ODFE: EA EA 
GbB9D: EA EA EA 131 HEX EAEAEAEAEA 
oDAD: EA EA 
oDAZ: EA EA EA 132 HEX EAEAEAEREA 
DAS: EA EA 
ODA7: EA EA EA 175 HEX E#SEAEAEAEA 
oDAA: EA EA h 
ODAC: EA EA EA 134 HEX EAEAEBREAEA 
üDAF: EA EA 
ODBl: EA EA EA 15 HEX EAEAEAEAEA 
oDR4: EA EA 
ODE&s: EA EA EA i36 HEX EAEREAEAEA 
ODEF: EA EA 
ODER: EA EA EA 137 HEX EAEBAEAEAEA 
ODBE: EA EA 
DECO: EA EA EA 138 HEX EAEAEREAEA 
oODE3: EA EA 
ODES: EA EA EA 139 HEX EAEAEREAEA 
HODCB: EA EA 
ODEA: ER EA EA 140 HEX EAEAEAEAEA 
OBCD: EA EA 
ODEF: EA EA ER 141 HEX. EAEAEAEAEA 


ODD2: EA EA 
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0000000101010 ml nn 


0DD4: 
ODD7+ 
ODDY: 
ODDC: 
ODDE: 
ODE1: 
ODET: 
ODE&: 
ODEB: 
ODER: 
ODED: 
ODFoOz 
ODF2: 
opFs: 
ODF?7: 
ODFA: 
ODFG: 
ODFF: 


VEODE 
VOEOFS: 
UEOS: 


DEOS: 


OEO08: 
GEOB: 


GEOE: 
DEIIL: 
oE14: 
DE174 
DE1A: 
OE1D; 


VEZO: 


10 


A? 


ER 


EA 


EA 


Er 


EA 


EA 


EA 


EA 


EA 


FD 
FC 


[Bi®) 
co 
ro 
Co 
Co 
1818) 


167 
1568 
169 
170 


171 
172 
173 
174 
175 


17% 


177 
178 
173 
180 
181 
192 
185 
154 
185 
186 


HEX 


# 
+ 


EAEAREABRAER 
EAEAEAEAEA 
EAEARBAEAER 
EAEAEAEAEA 
EAEAEAEAERA 
EAEAERAEAEA 
EAEAEREAEA 
EREAEAEAEA 


ERAFBAEAEA 


* FPBASIC + MONITOR AFFLE II FLUS 
* FOR AFPLE IIE WITH 64# 


+ 

FFEASICI EQU 
FFBASICZ EQU 
DOSWARM EQU 
FRINT E@OU 
HOME Edu 
%* 


1000 
€*DOOO 
ZOFDO 
EFDED 
#FL58 


* EXIT. IF BRUN FROM &4K 


* 
LDA 
BPL 
RTS 
* 


$C015 
START 


* DISABLE 80-C0L-CARD 


* 
START LDA 


JSR 
JSR 


+ % 


SsTX 
STX 
STA 
STK 
L.DX 
LDX 


zur %* 


LDA 


#373 


FRINT 
HOME 


SET SOFT-SWITCHES 


$C00B 
+L.O00 
$CO0C 
COOr 
+L0933 
C083 


#<{FPBASICI 


CARD 


CARD 


: AUXRAMT? 
«NO! 


; ETRL-U 


:C3SLOT 
:8ö-OFF 
40-COL 
; ALTCHR 


‚3 KD-LG 


ıUR-LE 


D 
MOVE FP + MON (#1000-#£3FFF) 
TO LANGUAGE CARD BANK 
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VEF?2=s 
DOE24: 
VER&: 
OEZB: 
DEZA: 
DEZE 
OEZE: 
OEAQ: 
HES2: 
OES4: 
OES&:4 
OE37: 
0ES9: 
OESEB: 
QEFD: 


DBESF: 
OE42: 
OE43: 
OE4AS: 


DE4E: 
ÖE4E% 
DES1: 
oES4+ 
0ES7: 
GESA? 
OESD: 
DESQ: 


VE6S: 
DEASS 


OE69: 
OE&C: 
DEAF 4 
OE72: 


DE7S:E 
DE7B: 
OET7B: 
DETE: 


oES1: 
oDE84: 


OEB?:E 
OEBA:r 
OEBD: 
VE9O: 
OEFF3: 


187 
198 
18? 
196 
177 
192 
173 
194 
195 


196 


197 
198 
199 
200 
201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
>12 
21% 
214 
215 
21& 
217 
218 
219 
ao 
221 
2272 
223 
224 
225 
226 
227 
228 
229 
250 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 


sSTA InDi 
LDA #>FPRASICI 
STAA INDIi+i 
LDA #5FFBASICE 
sta IND2 
LDA #>FFBASICZ 
STA IND2+1 
LDY #0 : 

MOVE LDA IND1),Y 
ST (IND2) ,Y 
INY 
BNE MOVE 
INE INDi+1 
INC IND2+1 
EBENE MOVE 

* 

= MONITOR FATCHES 

% 
LDA FD82 
sTA #FDS2 
LDA FD82+1 
STA #FDsS2+1 

= 
LDA Fmii 
sTA #FDii 
LDA FDii+i 
sTA #FDii-+l 
LDA FDii+2 
STA #FD11+? 
LDA FDil+3 
STA #£FDil+3 

+ 
LDA FBES 
STA #FBES3 

La 
LDA FESO 
STA #FESD 
LDA FESO+1 
STA ZFESO+rl 

* 

* AFFLESOFT FATCHES 

* 
L.DA 277 
STA #+F277 
LDA F277+1 
STA #F277+i 

+ 
LDA FZ80 
STA #F28U 
LDA F2Z80+1 
STA #F280+1 
LDA F280+2 
STA F290+2 
LDA F28B0+3 


s{FFFF#+1 
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196 6. RWTS (Read-Write-Track-Sector) 





VEF&b: BD 85 F2 241 STA #F280+T 
OE99: AD 04 OF 242 LDA F290+4 
DEFC: 8D 84 FE A 243 STA #F280+4 
244 % 
OEFF: AD O5 oF 245 LDA Fi81 
QEAZ+: BD 81 F1- 745 STA #F181 
VOEAS: AD 06 OF 247 LDA Fi8i1+1 
OEAB: BD BZ Fi 248 sTA #Fi181+1 
OEARB: AD 07 QF 249 LDA Fi81+2Z 
OEAE: BD 85 Fi 250 sTA #Fi181+Z 
GEB1: AD 08 üaF 251 LDA Fi8i+3 
OEB4: SD 84 Fi 252 STA #Fi8i+3 
VBEB?T: AD 09 OF 2523 [DA  F181+4 
ÖEBA: BD 85 Fi 254 sTAaA #Fi81+4 
OERBD: AD oA OF 255 LDA Fi181+5 
OECO: BD B& Fi 236 STA sFi181+5 
OEC=Z: AD OB GGF 257 LDA Fi181+s& 
VECö: 8D 87 Fi 258 STA #F181+6& 
IT 
260 * RESET FATCHES 
281 1% 
gEEIE ADNF2:DE 262 LDA &£03FZ 
VECC: SD is ÖF 2863 STA RESETOLD+1 
VECGF: AD FZ UI 2644 \ LBA 2 EO3FE 
oEDB2: SD 17 OF 265 STA RESETOLD+Z 
Zub #* 
GEDS: AZ OB 287 LDX #11 
VOEDT: BD al OF 2648 RES LDA 0304,X 
OEDA: ID C4 05 269 STA #03C4,X 
BEDD: CA 270 DEX 
DEDE: 10 F7 271 BrL RES 
2ER 8 
ÖOEEO: AD 18 OF 2753 LDA OSFZ 
DEES4+ 8D F2 03 274 STA z05F2 
DOEE6: AD 19 OF 275 LDA OFFE+Hl 
OEEY: 8D F3 035 276 STA z03F2+Hl 
ÖEERC: AD 1A OF 277 LDA DIF2H2 
OEEFı+ 8D FA 03 2778 STA ZO3F2+2 
DIE 
OEF2: 4C DO 03 280 JmP  DOSWARM 
OLE j# 
>82 * MONITOR: 
283 %* 
DEFEI ZRNER 284  FD8SR AND ##FF : CAFST 
GEFT% 29 7F 85 FDii AND #E£7F :RDEEY 
EFF: EA 286 NOP 
GEFA: ER 2897 NOF 
OEFEB: 06 288 FEBE HEX 06 «VERSTON 
OEFC: Ab 7F 257 FEBO L.DY ##£7F : SETINV 
290 * 
291 * AFFLESOFT: 
2IE & 
DEFE: AP: 7 293.:F277 LDA ##7F ; INVERSE 


oOF90: A? 7F »94 F280 LDA ##7F 





6.2.11. FASTBRUN-Routine (Apple II Plus Emulator für IIe) 
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OFO2: 
üFrO0S: 
OFO7:% 
OFoF: 


OFüC:z 
OFF: 
Ori12: 


OFiS: - 


OF18: 
OF19: 
OF1A: 


--End 


ac 


A7 


95 
4C 


assembly-- 


OF CH 
83 Co 
83 Co 
EF SD 


533 bytes 


Errors: 


295 
296 
297 
2978 
299 
300 
301 
302 
303 
>04 
>05 
306 
307 
>08 
307 
310 
S11 


Fiei 


# 

* RESET 
* 
RESETNEW 
+ 

0304 


RESETOL.D 
* 
OSFZ 


JMP 
LDA 
sSTA 
JMP 


ERU 


STA 
LDA 
LDA 
JMP 


DFE 
DFB 
DFE 


$F279 


#+C0 
+S1 
£ZF175 


0304 


FCOOF 
#C085 
0083 
#9DEF 


#{RESETNEW 
#>RESETNEW 
FOF!EAS 


«FLASH 


;HIMEM 


; 1ZBYTES 


:ALTCHR 
;RD-LC 
sWR-LC 
;FOKED! 


;PAGE 3 
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6502-Befehlstabelle 
Function Accu. | Immedi. .| ZeroxX | zero,Y | Absol.| Abs,X | Abs,Y | (ind,X (Ind}Y | Implled| Relative] Indirest | Status 
Op} Cy] Op] Cy | Op Cy| Op| Cy | Op | Cy] Opı Gr| Op| Cy| Op| ©y Opı Gy| Op| Cy] Op! Cyl Opl oyl Op| SyInzcı DV 
Load LDA Ag AS B5 AD! 4| BD B9 A1 B1 NZ=-->- 
LDX A2 A6| 3 B6| A| AEI 4 BE NZ ——- 
LDY AO A4| 3 184 AC| 4 | BC NZ 
Store sTA 8 2) 3D TENCHES IE SA I 
STX 86 rule sie al la I I 311 21177) 10 [a u VE en einige 
STY 34 94 32 & | rl: lese ale ar ee 
Transfer TAX AA NZ--—- 
TXA BA re 
TAY AB MI 
TYA 98 NZ---- 
Stack Ptr | TSX , BA Vzss>- 
: TXS ÜAl2| I! | I .------ 
= sel. ee [ aRebl ei Tail [I ss 
PLA NZ ---- 
Statusr. | PHP = 
PLP 
Flags CLC 
SEC ' 


= a — 
Retum a ee 
NZCI DV 

Compare NZC---— 
NAG-r: 

NZGE>—— 

—Z .— — 

Branch aolae=:| I I-----—- 
N=0 12+) | I------ 

EA io ee 

z=Dd D+H | |-----—- 

Bo ee ea WI 

c=0 ol+ | I------ 

+ | |-==---- 

V=0 50+ | I=------ 
Increment NZ 
NZ---- 

NZ---- 

Decrement MI 
NZ ---- 

Ar Sie 

Add/Subt. 4 6D NZC--V 
4 ED NZC--V 

Boolean 4 2D 4 NZ---—- 
4 0D 4 NZ —-——- 

4 4D 4 NZ --- 

Shift 8 oe| 6 | 1E W NZC--- 
6 4E| 6 | SE NZC--- 

Rotate NZC--- 
NZ20-77 

Miscell. Si [1 —; 
No. of Bytes I = 


* =1 Takt mehr bei Seitenübergang; 
+ =2 Takte ohne Verzweigung, 3 Takte bei Verzweigung, 4 Takte bei Verzweigung mit Seitenübergang. 











+COPBEN<X<EZSCHHISTOZZTZKCLGH ID NnmonuDm 


+ru nee 


JylI ku JONFPUSUNHON: 


OODOOHOO 
OODOGOANOL 
OHOOOO1O 
OGOOHQ11 
OOHOO1OO 
GO0OOD101 
OO000110 
OO000111 
OOHOQO1OOO 
OHO001001 
SOOH1OLO 
OOOa1O11 
00001100 
00001101 
OOOH91110 
oooo1111 
O0O010000 
OOD1O0OO1 
OOO1OO10 
00010011 
OCHO1O100O 
O0010101 
SHOO1O11O 
aoai1oı1ii 
GOHL1OOO 
90011001 
00011010 
Ooo11011 
OOO411100 
O0O011101 
00011110 
oooi11i1i 
AOLOOOOO 
00100001 
OO1O0010 
OG1OOO11 
SO1LOO1OO 
acıoO101 
OOLOO11iQ 
00100111 
GO1U1000 
oa1nı1o01 
OO101010 
oo1o1011 
OO101100 
HO1OL1O1 
DO1O111O 
oo10o1111l 
00110000 
Go110001 
oo110010 
OO110011 
OO110100 
00110101 
00110110 
00110111 
oG111000 
HO111001 
oo1110901O 
oo111011 
00111100 
oo111101 
HQo111110 
oo11111i 


+ CO RN<SC<EICHH TO TtToszz rt kur Ionmonnmden 


Rome N<Xrr<Eer sin oo3 3 rer TFT o+pancy 


ASCH-Tabelle 


O1OOOOOH 
H1OOOOO1 
1000010 
O1ODOO11 
O1OO0100 
oO1OGO101 
O10OO0110O 
o1000111 
O1OHLOOO 
01001001 
Q1O0O101O 
1001011 
01001100 
01001101 
01001110 
o1001111 
01010009 
O101OHG01 
G1010010 
01010011 
01010100 
o1o10101 
O1010110 
o1010111 
o1U11000 
o16011001 
o1011010 
01011011 
01011100 
1011101 
101111 
o1o1 1111 
01100000 
01100001 
o11d0010 
1100011 
01100100 
O11OO101 
o1100110O 
o1100111 
oL101000 
O1LOIOOAL 
H11010I1O 
01101011 
01101100 
01101101 
01101110 
o1101111 
Q1110000 
a1110001 
o1110010 
01110011 
01110100 
01110101 
D1110110 
o1110111 
01111000 
01111001 
01111010 
01111011 
o1111100 
o1111101 
o1111110 
Giii1111 


064 
65 
056 
067 
058 
089 
070 
o71 
072 
0753 
074 


+cU BEN <XE<CcCcHÄHDTI BTIOZZTRZRUHIO NR OH GI De“ 


JUN Am SONG UIPUNHFON: 


10000000 
10000001 
10009910 
10000011 
10000100 
10000101 
100009110 
10000411 
10001000 
10001001 
10001010 
10001011 
1001100 
10001101 
10001110 
100014111 
10010000 
10010001 
1009109010 
10010011 
100109100 
10010101 
10010110 
10010111 
100110009 
10011001 
16611010 
10011011 
10011100 
160111601 
10611110 
10011111 
101000090 
10100001 
10100010 
10100011 
10100100 
i0100101 
101001109 
10100111 
10101000 
10101001 
10101010 
0101011 
10101100 
10101101 
10101110 
10101111 
10110000 
10110001 
10110010 


' 10110011 


10110100 
10110101 
10110110 
10110111 
10111000 
10111001 
10111010 
10111011 
10111100 
10111101 


10111110 


10111111 


‚ı +COPRN<RCECCHHISTOGZZITRU- Io NnNmMUOn m pn 


Dem NX<XXSr<EernsvyiotDo 3 Hr zer Totnpnancoo 


11000000 
11000001 
11000010 
11000011 
11000100 
11000101 
11000110 


11000111 ° 


11001000 
11001001 
11001010 
11001011 
11001100 
11001101 
11001110 
11001111 
11010000 
11010004 
11010010 
11010011 
11010100 
11010101 
11010110 
11010111 
11011000 
11011001 
11011010 
11011011 
11011100 
11011101 
11011110 
11011111 
11100000 
11100001 
11100010 
11100011 
11100100 
11100101 
11100110 
11100111 
11101000 
11101001 
11101010 
11101011 
11101100 
11101101 
11101110 
11101111 
11110000 
11110001 
11110010 
11110011 
11110100 
11110101 
11110110 
11110111 
11111000 
11111001 
11111010 
11111011 
11111100 


11111101- 


11111110 
11111111 
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Register 
6502-Befehlstabelle 198 


A (= Adresse) 25 

A (= Applesoft) 24 
Anführungszeichen 41 

APPEND 61 

APPEND-WRITE 61 

Apple II Plus Emulator 129 
Applewriter 1.1 Binärfile-Konverter 40 
ASCI 32 

ASCH-Tabelle 199 


B (= Binärfile) 24 
Bad-Sector-Routine 124, 159 
Basicfile 23 

Befehlsname 11 

Big Mac 69 
Bildschirm-Speicherstellen, versteckte 88 
Binärfile 24 

Bit 7 12, 32 
Bit-Verschlüsselung 72 
BLOAD 24, 90 
Bload-Finder 66 

Booten 6 

Boot-Programm 90 

BRUN 24 

BSAVE 24 

Byte 5 

B(yte) 61, 65 


C (= Command) 22 


C600G 6 

CALL 1002 (DOS-Reconnect) 23, 83, 
103 

Carry-Flag 109 

CATALOG 3 

Catalog-Pause 86 

Catalog-Sektor 74 

Catalog-Spur 70 

CHAIN 27 

CHR$(13) + CHR$(4) 82 

CHR$(4) 13 

CHRS$(4) allein 43, 65 

CHRS(X) 38 

CLOSE 27, 82 

Command Interpreter 105 

Controller 4 

Controller-Boot-Programm 9% 

Corvus 17 

COUT (= Character output) 87 

CPM-Refiner 97 

CSWL (= COUT Switch Low Byte) 
100 

Ctrl-0 31, 54, 58 

Ctrl-D 13, 33 

Ctrl-M 30 

Ctrl-P 6 

Cursor 6, 12 


D (= Drive) 15 
D$ 13 
Datei 2, 27 


Register 


Dateiname 11 

Dateityp 70 

Datendiskette ohne DOS 125, 163 

Daten-Puffer 77 

Datensatz 55 

Daten-Sektor 73, 75 

DCT (= Device Characteristics 
Table) 107 

DELETE 18 

direkte Befehle 12 

direkter Zugriff 54 

Disk-Comparer 124, 153 

Disk-Emulator 125 

Diskette 4 

Diskleser 121, 130 

Diversi-DOS 3, 47, 92, 126 

Doppelpunkt 41 

DOS (= Disk Operating System) 2 

DOS auf Diskette Track 00-02 123 

DOSCOLD (= Kaltstart) 103 

DOS-Kopie Track 00-02 122, 150 

DOS-lose Datendiskette 125, 163 

DOSMOVER 126 

DOSMOVER-RAMDISK-Driver 125, 
170 

DOS-Output-Vektor-Änderung 101 

DOS-Vektoren 83, 100, 103 

DOSWARM (= Warmstart) 103 

Drive 4, 16 

Drive-Wechsel 45 


EO000-Patch 84 
Endmarker 31, 54 
EXEC 66 


FASTBRUN-Routine 129, 191 
Fehlermeldung 109 
Fehlermeldungen 78 

Feld 31, 36, 55 

File 2 
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File Manager 105 

File-Reader 128, 186 

Filz 5 

Formatierung 7 

FP 20 

FPBASIC 129, 191 

freie Sektoren auf der Diskette 92 
freie Stellen im DOS 89 


GET 31, 38, 65, 67, 82 
GETIOB 108 
GEILN 47, 52, 94 


Hello-Programm 8, 84 
HIMEM 20-21 
Hires-Bilder 83 


I(= Input) 2 

I (= Integer) 24 

IN 22 

indirekte Befehle 12, 15 
indirekter Zugriff 54 

INIT 7, 18, 87 

Initialisierung 7 

INPUT 34 

INPUT-Länge 39 

INT 20 

Interleaving (= Skewing) 111 
„in use‘‘-Lämpchen 5 
inverse Dateinamen 90 

IOB (= Input-Output-Block) 107 
IOBWO? (= GETIOB) 108 


Kaltstart 103 

Kilobyte 6 

Kolon 41 

Komma 34, 36, 41 
Komma-Kolon-Test 42 
Kopierprogramm 10 
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Kopierprogramm, 1-Drive-Version 
122, 141 

Kopierprogramm, 2-Drive-Version 
121, 133 

Kopierschutz 91 

KSWL (= KEYIN Switch Low Byte) 
100 


L (= Länge) 25, 55 

Länge (eines Binärfiles) 26, 90 
Language Card 7, 20, 47 
Laufwerk 4 
Laufwerkklappe 5 
Laufwerksgeschwindigkeit 4 
List-Maker 67 

List-Schutz 86 

LOAD 23 
„Loch’’-Kopierschutz 91 
LOCK 8 

Lock-Flag 70 

Low Byte first 25 


MAINRAM TO AUXRAM MOVER 


127, 177 

MAXFILES 20 

Merge 45 

Merlin 69 

Mischen 45 

MMU (= Memory Management 
Utilities) 125 

MON 2 

Motor ein- und ausschalten 89 

Mystery Parameter 86 


NEW 20 
NOMON 22 
NUL 32 


O (= Output) 22 
ON ERROR 78 


Register 


OPEN 27 
OPEN-DELETE-OPEN 29 
OPEN-File 43 
OPEN-POSITION-WRITE 63 
OPEN-WRITE 28 


Page 3 (DOS-Vektoren) 103 
Parameter 15 

Patches 81 

POSITION 61 

Position, relative und absolute 62 
PR 6, 2 

PRINT 34 

Printer-Driver 101 

ProDOS 2 

Prompt 12 

Prozessor-Takte 111 
Pseudo-Disk 125 

Puffer 20-21, 77 


R (= Record) 56 

R (= relative Feldposition) 61 
RAM-Disk 125 

RAM-Disk-Driver 180 
Random-File 54, 127 

RDKEY 94 

READ 27 

Record 55-57 

Registerprogramm 46 

RENAME 19 

Reset 5, 83 

Return 30, 59 

RUN 23 

RUN-Modus 12, 85 

RWTS (Read-Write-Track-Sector) 105 
RWTS-Anwendungsprogramme 121 
RWTS-Aufruf 109 

RWTS-Muster 110, 113 
RWTS-Parameter-Tabelle 107 
RWTS-Test mit Skewing 111, 119 
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RWTS-Test mit Warteschleife 111, 116 


S (= Slot) 15 

SAVE 23 
Schreibschutz 9 
Sektor 5 
Sektor-Offset 71 
Semikolon 30, 34, 38 
sequentielle Datei 54-55 
Skewing 111 

Slot 15-16 
Slot-Wechsel 45 
Speicherkapazität 5 
Spur 5 

Startadresse 24-25 
Steckplatz 16 

String 28-39 
String-Länge 39 


T (= Textfile) 24 
TASC 27, 47, 95 
Tastaturabfrage 82 
Textfile 27 

Tips und Tricks 81 
Token 12 

Track 5 
Track-Sektor-Paare 72 
Track-Sektor-Tracer 73 
TSL (= Track-Sektor-Liste) 60, 70-71 
TSL-Maker 127, 184 
TSL-Puffer 77, 128 
TSL-Sektor 71, 74 


UNLOCK 9 
UNLOCK-Tirick 127 


V (= Volume) 15 
Vektoren 100, 103 
VERIFY 9 
Volume 16 


vorformatierter Random-File 58 

VTOC-Sektor 74, 167, 173 

VTOC (= Volume Table of Contents) 
60, 72 


Warmstart 103, 110 
WRITE 27 


Zahlen 28, 33, 83 
Zero-Page 88 


Fehler-Nummern 
RWTS-Fehler-Codes 

08 = INIT-Fehler 

10 = schreibgeschützt 

20 = falsche Volume-Nummer 


40 = V/O-Fehler 


DOS-Fehler-Codes 


1 = LANGUAGE NOT AVAILABLE 


2 = RANGE ERROR 

3 = RANGE ERROR 

4 = WRITE PROTECTED 
5 = END OF DATA 

6 = FILE NOT FOUND 

7 = VOLUME MISMATCH 
W/O-ERROR 

9 = DISK FULL 

10 = FILE LOCKED 

11 = SYNTAX ERROR 

12 = NO BUFFERS AVAILABLE 


oo 
I 


13 = FILE TYPE MISMATCH 
14 = PROGRAM TOO LARGE 
15 = NOT DIRECT COMMAND 


Apple ProDOS für Aufsteiger, Band 1 


Apple rlılın Mit ausführlichen Programmbeispielen 


für Aufsteiger 


von U. Stiehl 


Mit ausführlichen 1984, 208 S., kart., DM 28, => 
Ulrich Stiehl Programmbeispielen ISBN 3-7785-1 027-4 


Begleitdiskette zu „Apple ProDOS für Aufsteiger‘‘, 
DM 28, — 
ISBN 3-7785-1032-0 


„Apple ProDOS für Aufsteiger, Band 2”, 

ca. 180 S., kart., DM 28, -, 

erscheint im Oktober 1984. 

ISBN 3-7785-1036-3 

Begleitdiskette, DM 28, -, ISBN 3-7785-1040-1 


ProDOS ist das neue Betriebssystem für den Apple Il Plus/lie. Applesoft-Program- 
mierer, die unter DOS 3.3 gearbeitet haben, werden sich schnell an ProDOS gewöh- 
nen, da ProDOS und DOS 3.3 in dieser Hinsicht weitgehend kompatibel sind. Dage- 
gen müssen Assembler-Programmierer völlig umdenken. Deshalb liegt das Schwer- 
gewicht von „Apple ProDOS für Aufsteiger, Band 1’ auf der Assemblerprogram- 
mierung und der minutiösen Darstellung der ProDOS-internen Systemadressen, die 
jedoch auch für Applesoft-Programmierer von großer Bedeutung sind. 

Zunächst wird zunächst ein allgemeiner Überblick über das neue ‚Professional Disk 
Operation System‘ gegeben. Im Anschluß daran folgt eine Gegenüberstellung der 
Geschwindigkeit des Diskettenzugriffs bei DOS und ProDOS. Dann wird die interne 
Speicherorganisation detailliert beschrieben (Boot-Vorgang, Zero-Page, ProDOS- 
Vektoren, Basic-System-Puffer, Basic-System-Global-Page, Basic-Command-Hand- 
ler, l/O-Vektoren, ProDOS-Global-Page, Language-Card-Organisation, Interrupt, 
Disk-Driver, Reboot-Programm usw.). Ebenso ausführlich wird die externe Speicher- 
organisation geschildert (Spuren, Sektoren, Blocks, Directory-Struktur, Volume Bit 
Map, Dateistrukturen usw.). Schließlich wird das MLI (Machine Language Interface) 
mit zahlreichen praktischen Anwendungsbeispielen erläutert. Insgesamt enthält 
ProDOS-Buch ca. 70 Seiten mit eigens für dieses Werk entwickelten Programmen. 
Danach wird das Basic-System technisch für fortgeschrittene Applesoft-Program- 
mierer kurz erläutert. 

„ProDOS für Aufsteiger, Band 2” beschreibt ausführlich die Anwendung des ProDOS- 
BASIC-SYSTEM für Applesoft-Programmierer und enthält darüber hinaus zahlreiche 
größere Assembler-Anwenderprogramme, die aus Platzgründen in dem ersten Band 
nicht mehr untergebracht werden konnten. 








ProDOS-Editor 1.0 


Applesoft-Editor 
unter ProDOS-Betriebssystem 


von U, Stiehl 


Huethig somware service 


1984, Diskette und Manual, DM 98, — 
ProDOS-Editor ISBN 3-7785-1024-X 


Mit diesem neuen Editor — übrigens der bislang einzige deutsche ProDOS-Editor — 
wird dem Applesoft-Programmierer ein Werkzeug zur effektiven Programmierung 
unter dem Betriebssystem ProDOS gegeben, denn die früheren Editoren sind alle- 
samt unter ProDOS nicht mehr lauffähig. 
Unter anderen sind folgende Features implementiert worden: 
Zeilenorientierter Editor mit jedem erdenklichen Redigierkomfort (Insert, Delete, 
Tab, Restore, freie Cursorbewegung in allen vier Richtungen, Eingabe von Ctrl- 
Buchstaben in Applesoft-Zeilen usw.) 
Renumber (Zeilen-Umnumerierung) 
Xreference (sortierte Variablenliste) 
Suchen von Tokens, Strings und Variablen 
dezimale und hexadezimale Umrechnung 
Ausführung von Monitorbefehlen aus dem Editor heraus 
Listen des Applesoft-Programms in speicherinterner Form als Hex-Dump 
Suchen von Hex-Folgen, Adressen oder Speicherstellen im gesamten RAM-Be- 
reich einschließlich der Language Card 
frei definierbare Tastatur-Macrobefehle 
Block-Dump (Einlesen und Speichern von ProDOS-Diskettenblocks) 
Der Applesoft-Editor liegt in einem von ProDOS geschützten Bereich und läßt sich 
per Tastendruck vorübergehend abschalten und ebenso einfach wieder aktivieren. 








o-0P>Po mu Jon oo -uouo Juao>o-por sum 7m -4-> 


-. 
Huchig some vice 


Begleitdiskeite 
zu „Apple DOS 3.3" 


002 STIEHL 

004 BLOAD-FINDER 

003 LIST-MAKER 

004 TRACK-SECTOR-TRACGER.S 
004 T.TRACK-SECTOR-TRACER 
002 TRACK-SECTOR-TRAGER 
003 FREIE SEXTOREN.S 

002 T,FREIE SEKTOREN 

002 FREIE SEKTOREN 

006 FUSION-TASC.S 

006 T.FUSION-TASC 

002 FUSION-TASC 

004 CPM-REFINER 

006 CPM-REFINER.OBJ.S 

006 T.CPM-REFINER.OB)J 

002 CPM-REFINER.OBJ 

008 DOS-OUTPUT-VEKTOR.S 
008 T.DOS-OUTPUT-VEKTOR 
002 DOS-OUTPUT-VEKTOR 
011 RWTS-MUSTER.S 

011 T.RWTS-MUSTER 

002 RWTS-MUSTER 


009 RWTS-TEST.WARTESCHLEIFE:S 
009 T.RAWTS-TEST.WARTESCHLEIFE 


002 RWTS-TEST.WARTESCHLEIFE 
005 RWTS-TEST.SKEWING.S 

005 T.RWTS-TEST,SKEWING 

002 RWTS-TEST.SKEWING 


- 004 DISKLESER 


007 DISKLESER.OBJ.S 
007 T.DISKLESER.OBJ 
002 DISKLESER.OBJ 


Begleitdiskette 
zu „Apple DOS 3.3 — 
Tips und Tricks“ 


DM 28,— 


ISBN 3-7785-1032-0 


H“Tom-uron Hueu-wu-ooun oo -uom-oun-om-m 


018 
018 


KOPIERPROGRAMM.2DRIVE.S 
T.KOPIERPROGRAMM.2DRIVE 
KOPIERPROGRAMM.2DRIVE 
KOPIERPROGRAMM.1DRIVE.S 
T.KOPIERPROGRAMM.1DRIVE 
KOPIERPROGRAMM.IDRIVE 
DOS-KOPIE-TRACK 00-02.5 
T.DOS-KOPIE-TRACK 00-02 
DOS-KOPIE-TRACK 00-02 
DISK-COMPARER.S 
T.DISK-COMPARER 
DISK-COMPARER 
BAD-SECTOR-ROUTINE,S 
T.BAD-SECTOR-ROUTINE 
BAD-SECTOR-ROUTINE 
DOS-LOSE DATENDISKETTE.S 
T.DOS-LOSE DATENDISKETTE 
DOS-LOSE DATENDISKETTE 
DOSMOVER-RAMDISK-DRIVER.S 
T.DOSMOVER-RAMDISK-DRIVER 
DOSMOVER-RAMDISK-DRIVER 
TSL-MAKER 
TSL-MAKER.OBJ.S 
T.TSL-MAKER.OBJ 
TSL-MAKER.OBJ 

FILE-READER 
FILE-READER.OBJ.S 
T.FILE-READER.OB)J 
FILE-READER.OBJ 
FASTBRUN-ROUTINE.S 
T.FASTBRUN-ROUTINE 


Dr. Alfred Hüthig 
Verlag GmbH 
Postfach 102869 
6900 Heidelberg 1 


Die Einführung in die Datenbanksprache dBASE Il 


Wolfgang Eggerichs 


dBASE II 


Band 1: Einführung 


1984, 174 5., kart., DM 36,— 
ISBN 3-7785-0986-1 


In Vorbereitung: 
Band 2: Programmierung in dBASE Il, ISBN 3-7785-0987-X 


Band 3: Aufbau und Nutzung von Datenbanken mit dBASE II, 
ISBN 3-7785-0933-8 


Diese Buchreihe befaßt sich mit dem Datenbanksystem dBASE Il, 
einem speziell für Mikrocomputer entwickeltem System. Dieses Da- 
tenbanksystem läuft unter den Betriebssystemen CP/M, MP/M, 
MS-DOS und PC-DOS. 


Um den Anfänger den Einstieg in dieses doch recht mächtige 
Software-Werkzeug zu erleichtern, werden in den beiden ersten auf- 
einander abgestimmten Bänden jeweils die zu einem bestimmten Lei- 
stungsbereich gehörenden Kommandos herausgefiltert und erläutert. 
Zusätzlich sind kleine Aufgaben integriert, an denen der Leser theore- 
tisch oder/und praktisch seinen Kenntnisstand von dBASE || überprü- 
fen kann. Im dritten Band erfolgt dann eine Darstellung der verschie- 
densten Einsatzmöglichkeiten von dBASE Il. 


Der vorliegende 1. Band dieser Einführung befaßt sich mit der reinen 
Dialogarbeit in dBASE Il. In kleinen, methodisch aufeinander abge- 
stimmten Kapiteln erfährt der Leser die wichtigsten dBASE |l- 
Kommandos, um kleine Aufgaben der Datenverwaltung selbständig 
lösen zu können. 


Aus dem Inhalt: 


Befehle zum Erfassen, Anzeigen von Listen und Daten : Ändern, Kopie- 
ren und Sortieren von Datenbankinhalten - Zeichen(ketten)-Bearbei- 
tung in dBASE Il - Arbeiten mit indizierten Datenbanken in dBASE Il - 
Löschen und Ändern von Datensätzen, Dateien und Datenbankstruk- 
turen - Erstellung von Summen und Berichten : Verändern von 
dBASE Il-Systemeinstellungen - Durchführung und Erstellung von 
Kommando-Dateien - Weitere dBASE Il-Anweisungen 
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Der für den Apple Il bestimmte Maskengenerator „Input 2.0‘ basiert auf den frühe- 
ren Programmen „Input 1.0” und „Input80 1.0‘ (von denen noch Restbestände 
lieferbar sind) und ist sowohl unter DOS 3.3 wie auch unter dem neuen ProDOS 
lauffähig. Der Maskengenerator setzt einen Apple Il Plus mit Language Card oder ei- 
nen Apple Ile voraus. Im 40 Z/Z-Modus funktioniert er auf beiden Gerätetypen, im 
80 Z/Z-Modus dagegen nur auf dem Apple Ile mit 80-Zeichen-Karte. (Die alte Videx- 
Karte für den Apple II wird nicht unterstützt!) 

„Input 2.0” liegt wahlweise in der Bank 1 oder Bank 2 der Language Card und wird 
durch einen kurzen Driver in den unteren 48K aufgerufen. „Input 2.0‘ läßt sich pro- 
blemlos in nicht-compilierte und compilierte Applesoft- sowie in Assemblerpro- 
gramme einbinden. Die Übergabe der Feldinhalte an das Anwenderprogramm erfolgt 
durch ein einfaches Verfahren, das auch bei Compilern funktioniert. 

Für jedes Feld der Bildschirmmaske lassen sich u. a. definieren: Feidlänge (bis zu 
955 Zeichen) — Vtab — Htab — Datentyp (insgesamt 8 Typen) — Scrollflag (starre 
oder dynamische Maske) — Ctriflag — Füllflag — Löschflag — Bildschirmflag (40- 
oder 80-Z-Darstellung). Innerhalb eines Eingabefeldes besteht jeder denkbare Redi- 
gierkomfort (Insert, Delete, Rubout, Restore usw.). 

Bei der neuen Version des Maskengenerators können jetzt auch Ctrl-Zeichen beim 
Datentyp String eingegeben werden. Ferner sind — dies gilt nur für Ile — die Apfel- 
tasten als schnelle Cursortasten definiert. Schließlich wurden Features implemen- 
tiert, die den Einsatz von „Input 2.0“ als zeilenorientiertes Textverarbeitungspro- 
gramm ermöglichen. Die „Input 2.0”-Diskette enthält zahlreiche Demos zur Veran- 
schaulichung der Anwendung. 
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„Softbreaker‘’ ist ein Assemblerprogramm, mit dessen Hilfe Programme, die sich 
von der 64K-Karte (= Extended 80 Column Card für den Apple Ile) starten lassen, 
unterbrochen, gespeichert, geladen und exakt an der Stelle der Unterbrechung fort- 
geführt werden können. Dadurch ist es auch möglich, Sicherungskopien von soge- 
nannten kopiergeschützten Programmen herzustellen. Es sei hier ausdrücklich dar- 
auf hingewiesen, daß laut Urheberrechtsgesetz die Herstellung von Vervielfälti- 
gungsstücken nur von rechtmäßig erworbenen Werken und nur zum persönlichen 

Gebrauch zulässig ist. 

„Softbreaker‘' läßt sich bei folgenden Programmtypen anwenden: 

— bei grundsätzlich allen für den Apple Il Plus konzipierten Programmen, die die 
40-Zeichen-Darstellung und/oder die Grafikseite 1 (also nicht HGR2) benutzen, 
gleichviel ob sie durch Reset abgesichert sind oder nicht. 

. — bei grundsätzlich allen durch Reset abgesicherten Programmen, auch wenn sie 
die 80-Zeichen-Darstellung benutzen. 

Softbreaker funktioniert selbstverständlich nicht bei Programmen, die die 64K-Karte 

des Apple Ile in irgendeiner Form benutzen, z. B. nicht bei Programmen, die die 64K- 

Karte als RAM-Disk oder als Zusatzspeicher verwenden. 

Mit Softbreaker unterbrochene Programme werden komplett, d. h. die ganzen 64K 

einschließlich Language Card, in nur ca. 11 Sekunden auf einer formatierten Dis- 

kette gesichert, wobei die Rücksprungadresse und diverse Status-Werte automa- 
tisch mit abgespeichert werden, so daß keinerlei technischen oder Programmier- 
kenntnisse erforderlich sind. 
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Bei der Version 2.0 der MMU'’s sind die Utilities teilweise so umgeschrieben wor- 
den, daß sie sowohl unter DOS 3.3 als auch unter ProDOS lauffähig sind. Da dies 
nicht immer möglich war, sind zusätzlich zu den reinen DOS-Hilfsprogrammen, spe- 
ziell den RAM-Disk-Drivern, einige reine ProDOS-Utilities aufgenommen worden. 
Insgesamt enthält die neue „MMU 2.0°-Diskette über 25 Programme, die neue Ein- 
satzmöglichkeiten für die Extended 80 Column Card (erweiterte 80-Z-Karte = 64K- 

Karte für den Apple Ile) erschließen. Ein Teil der Programme laufen auch auf dem 

Apple Il Plus, doch ist „MMU 2.0’ primär für 64K-Karte-Besitzer gedacht. 

Im einzelnen umfaßt „MMU 2.0” 

—- Drei RAM-Disk-Driver für DOS 3.3: „INIT62‘ benutzt nur die 64K-Karte als 
RAM-Disk, „INIT 78’ benutzt zusätzlich die Motherboard-LC als RAM-Karte und 
„DOSMOVER. INIT 62° gilt für den Fall, daß sich das DOS selbst in der Mother- 
board-LC befindet. 

— Eine sehr nützliche Pseudo-Coprocessor-Utility, die das Hin- und Herschalten 
zwischen zwei Programm-Modulen ermöglicht, von denen sich das eine Modul 
auf der 64K-Karte befindet. 

— Zwei schnelle Kopierprogramme (für DOS 3.3 und ProDOS). 

— Mehrere Move-Programme zum Verschieben von Daten auf die 64K-Karte so- 
wie auf die Language Card und umgekehrt. 

Mehrere Hilfsprogramme zum Untersuchen und Löschen bestimmter Speicher- 
bereiche der 64K-Karte und der LC, zur Ermittlung des Softswitch-Status usw. 

— Zwei Simulator-Programme zum Simulieren von Apple II und Apple Il Plus auf 
dem Apple Ile. 

Schließlich enthält „MMU 2.0” auch verschiedene Move-Utilities für die RAM-Kar- 

ten AP2O und AP17 der Firma IBS. 





Dies ist die erste deutschsprachige 
Darstellung des Diskettenbetriebs- 
systems DOS 3.3 für den Apple Il/ll 
Plus/lie, die sich sowohl an Applesoft - 
als auch an Assembler-Programmierer 
wendet. Sinngemäß ist das Buch zwei- 
PESCHLR 


Der erste Teil behandelt ausführlich die 
dem Applesoft-Programmierer zur Ver- 
fügung stehenden DOS-Befehle, wobei 
die Textfiles wegen ihrer großen Bedeu- 
tung und der vergleichsweise kom- 
plizierten Handhabung besonders dar- 
gestellt werden. Viele Textfile-Tricks 
EIG GETnfejelslete 2 dee elle 
erfahrung des Autors werden hier zum 
erstenmal geschildert. 


Aber auch im zweiten Teil findet der 
reine Applesoft-Programmierer insbe- 
sondere in dem Kapitel „Vermischte 
Tips, Tricks und Patches“ zahlreiche 
Anregungen. Im übrigen ist der zweite 
Teil für Assembler-Programmierer ge- 
dacht. Neben einer detaillierten Be- 
schreibung der DOS-Interna enthält 
dieser Teil elf vollständige RWTS- 
Anwendungsprogramme — z.B. CPM- 
Refiner, DOS-lose Datendisk, TSL- 
Maker, File-Reader, Pseudo-Disk-Driver 
und Fastbrun-Routine —, die Techniken 
enthüllen, die bislang noch niemals 
publiziert worden sind. Dieses DOS- 
Buch ist deshalb der unentbehrliche 
Begleiter für jeden Apple-Programmierer. 











